Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.20
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
doc /
libdate-pcalc-perl /
examples /
[ HOME SHELL ]
Name
Size
Permission
Action
tools
[ DIR ]
drwxr-xr-x
EXAMPLES.txt.gz
7.24
KB
-rw-r--r--
TOOLS.txt.gz
1.98
KB
-rw-r--r--
age_in_days_eu.pl.gz
1.42
KB
-rw-r--r--
age_in_days_us.pl.gz
1.42
KB
-rw-r--r--
anniversaries.pl
2.26
KB
-rwxr-xr-x
bug.pl
764
B
-rwxr-xr-x
cal.c
2.71
KB
-rw-r--r--
calendar.pl.gz
5.65
KB
-rw-r--r--
datecalc.pl.gz
2.03
KB
-rw-r--r--
delta.pl
2.54
KB
-rwxr-xr-x
holidays.pl
1.98
KB
-rwxr-xr-x
income.pl
2.86
KB
-rwxr-xr-x
linearcal.pl
1.94
KB
-rwxr-xr-x
nth_weekday.pl
2.24
KB
-rwxr-xr-x
time.pl
1.28
KB
-rwxr-xr-x
vacation.pl
1016
B
-rwxr-xr-x
weiberfastnacht.pl
1.28
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : bug.pl
#!/usr/bin/perl -w BEGIN { eval { require bytes; }; } use strict; no strict "vars"; use Date::Pcalendar; use Date::Pcalc::Object; Date::Pcalc->date_format(2); $cal = Date::Pcalendar->new( {} ); $date = $cal->add_delta_workdays(2002,11,11,-1); print "\$date = $date\n"; $date = $cal->add_delta_workdays(2002,11,10,-1); print "\$date = $date\n"; $date = $cal->add_delta_workdays(2002,11,9,-1); print "\$date = $date\n"; $date = $cal->add_delta_workdays( $cal->add_delta_workdays(2002,11,11,+1), -2 ); print "\$date = $date\n"; $date = $cal->add_delta_workdays( $cal->add_delta_workdays(2002,11,10,+1), -2 ); print "\$date = $date\n"; $date = $cal->add_delta_workdays( $cal->add_delta_workdays(2002,11,9,+1), -2 ); print "\$date = $date\n"; __END__
Close
