Perl和MIME :: Lite - 为什么我的.txt附件是空白的？

Question

我一直在使用MIME :: Lite一段时间,直到现在都没有问题.

我正在尝试附加.txt文件,但文件(发送后)内部没有内容.

我知道文件中有一些东西,因为我.txt在同一个脚本中创建文件.我知道文件的位置并且可以看到它的内容,但是当我告诉MIME::Lite附加.txt文件时,电子邮件只带有文件名,只有64个字节.

这MIME::Lite是我的脚本部分的代码:

$msg = new MIME::Lite(From => $from,To => $to,Subject => $subject,Data => "Data",Type => "multipart/mixed",); 
$msg->attach(Type => 'TEXT', Data => @message);
$msg->attach(Type => 'TEXT', Path => $stat_file);
$msg->send();

哪里$stat_file=/in/some/dir/cheese/txt/somefile.txt

除了第3行外,一切正常.它正确地找到并附加我指向的文件,但当它到达我的电子邮件时,它是一个.txt64字节的空白文件.

我已经尝试了这个代码的前3行中的每一行的几个变体,但不知道我错过了什么.

有人看到这个脚本会按照解释的那样执行的原因吗？

Answer 1

你说你正在创建程序中指向的文件$stat_file,对吧？也许你没有关闭文件句柄到那个文件,可能它没有被刷新到磁盘？