Linux ip-172-26-7-228 5.4.0-1103-aws #111~18.04.1-Ubuntu SMP Tue May 23 20:04:10 UTC 2023 x86_64
Apache
: 172.26.7.228 | : 3.144.86.78
Cant Read [ /etc/named.conf ]
5.6.40-24+ubuntu18.04.1+deb.sury.org+1
www-data
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
Mail /
Mailer /
[ HOME SHELL ]
Name
Size
Permission
Action
qmail.pm
564
B
-rw-r--r--
rfc822.pm
622
B
-rw-r--r--
sendmail.pm
784
B
-rw-r--r--
smtp.pm
1.93
KB
-rw-r--r--
smtps.pm
2.09
KB
-rw-r--r--
testfile.pm
1.17
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : rfc822.pm
# Copyrights 1995-2016 by [Mark Overmeer <perl@overmeer.net>]. # For other contributors see ChangeLog. # See the manual pages for details on the licensing terms. # Pod stripped from pm file by OODoc 2.02. use strict; package Mail::Mailer::rfc822; use vars '$VERSION'; $VERSION = '2.18'; use base 'Mail::Mailer'; sub set_headers { my ($self, $hdrs) = @_; local $\ = ""; foreach (keys %$hdrs) { next unless m/^[A-Z]/; foreach my $h ($self->to_array($hdrs->{$_})) { $h =~ s/\n+\Z//; print $self "$_: $h\n"; } } print $self "\n"; # terminate headers } 1;
Close
