✏️ 正在编辑: qmail.pm
路径:
/usr/share/perl5/Mail/Mailer/qmail.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::qmail; use vars '$VERSION'; $VERSION = '2.18'; use base 'Mail::Mailer::rfc822'; sub exec($$$$) { my($self, $exe, $args, $to, $sender) = @_; my $address = defined $sender && $sender =~ m/\<(.*?)\>/ ? $1 : $sender; exec($exe, (defined $address ? "-f$address" : ())); die "ERROR: cannot run $exe: $!"; } 1;
💾 保存文件
← 返回文件管理器