添付ファイルをつけてメールを送る
以下のようなイメージでプログラムを制作しようと思っています。
csvファイル
メールアドレス1,添付ファイル1
メールアドレス2,添付ファイル2
メールアドレス3,添付ファイル3
メールアドレス4,添付ファイル4
・
・
・
cgiファイル
・csvファイルを読み込む
↓
・タイトル、本文は固定。
・メールアドレス1には添付ファイル1を送る。（アドレス2なら2を添付）
・csvファイルの行数だけこれを繰り返す。
-----------------------------------------------------------------
フォーム入力送信→担当者にメールが届く
というのはサンプルをもとに作る事ができたのですが、
それに「添付ファイルを付ける」にはどうしたら良いのでしょうか？
現在メールの書き出しは下記のようになっています。（添付無し状態）
#######################################################メール送信
$head = "From: 送信者" . "\n" . "To: 宛先" . "\n" . "Subject: タイトル" . "\n\n";
open(MAIL, "| sendmailパス -t -f'送信者'") ;
print MAIL "$head";
print MAIL <<__END__;
###メール本文###
__END__
close(MAIL);
![その他([技術者向] コンピューター) イメージ](https://gazo.okwave.jp/okwave/spn/images/related_qa/c205_1_thumbnail_img_sm.png)
