パイプライン it

perlで添付ファイルの送信でpermission deniedが出て動かない

…use strict; use warnings; use MIME::Lite; use Jcode; my $from = 'usui@*******'; # 送信元 my $to = 'yamada@******'; # 送信先 my $path = '.'; # 添付するファイル(このファイルを読み込む) my $filename = 'CIMG0020.JPG'; # 添付...…