Linux sagir-us1.hostever.us 5.14.0-570.51.1.el9_6.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Oct 8 09:41:34 EDT 2025 x86_64
LiteSpeed
Server IP : 104.247.108.91 & Your IP : 216.73.216.105
Domains : 74 Domain
User : georgeto
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
perl5 /
vendor_perl /
Mail /
Mailer /
Delete
Unzip
Name
Size
Permission
Date
Action
qmail.pm
750
B
-rw-r--r--
2019-05-21 14:26
rfc822.pm
809
B
-rw-r--r--
2019-05-21 14:26
sendmail.pm
971
B
-rw-r--r--
2019-05-21 14:26
smtp.pm
2.29
KB
-rw-r--r--
2019-05-21 14:26
smtps.pm
2.27
KB
-rw-r--r--
2019-05-21 14:26
testfile.pm
1.35
KB
-rw-r--r--
2019-05-21 14:26
Save
Rename
# Copyrights 1995-2019 by [Mark Overmeer <markov@cpan.org>]. # For other contributors see ChangeLog. # See the manual pages for details on the licensing terms. # Pod stripped from pm file by OODoc 2.02. # This code is part of the bundle MailTools. Meta-POD processed with # OODoc into POD and HTML manual-pages. See README.md for Copyright. # Licensed under the same terms as Perl itself. package Mail::Mailer::sendmail; use vars '$VERSION'; $VERSION = '2.21'; use base 'Mail::Mailer::rfc822'; use strict; sub exec($$$$) { my($self, $exe, $args, $to, $sender) = @_; # Fork and exec the mailer (no shell involved to avoid risks) # We should always use a -t on sendmail so that Cc: and Bcc: work # Rumor: some sendmails may ignore or break with -t (AIX?) # Chopped out the @$to arguments, because -t means # they are sent in the body, and postfix complains if they # are also given on command line. exec( $exe, '-t', @$args ); } 1;