文件操作 - nodisp
返回文件管理
返回主菜单
删除本文件
文件: /usr/share/doc/perl-MIME-Lite-3.030/examples/nodisp
编辑文件内容
#!/usr/bin/perl -w use MIME::Lite; use strict; my $msg = MIME::Lite->new(From => "me", To => "you", Subject => "hello", Type => "multipart/mixed"); my $part = $msg->attach(Type => "text/plain", Path => "/home/eryq/.cshrc", Encoding => '7bit'); $msg->scrub; $msg->print;
修改文件时间
将文件时间修改为当前时间的前一年
删除文件