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 :  /proc/17567/root/usr/share/doc/perl-Test-Simple-0.98/t/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //proc/17567/root/usr/share/doc/perl-Test-Simple-0.98/t/c_flag.t
#!/usr/bin/perl -w

# Test::More should not print anything when Perl is only doing
# a compile as with the -c flag or B::Deparse or perlcc.

# HARNESS_ACTIVE=1 was causing an error with -c
{
    local $ENV{HARNESS_ACTIVE} = 1;
    local $^C = 1;

    require Test::More;
    Test::More->import(tests => 1);

    fail("This should not show up");
}

Test::More->builder->no_ending(1);

print "1..1\n";
print "ok 1\n";


haha - 2025