vimsendmail.pl
#!/usr/bin/perl-w
useMIME::Lite;
subperl_sendmail{
my$mail_to=shift;
#my$mail_to="$_[0]";
my$from=shift;
#my$from="$_[1]";
my$subject=shift;
#my$subject="$_[2]";
my$data=shift;
#my$data="$_[3]";
$sendmail=MIME::Lite->new(
From=>$from,..
分类：
其他好文 时间：
2014-06-10 18:50:19
阅读次数：
310
