ところで>>624を見る限り2通送られるのは正常じゃないか
メール送信処理がふたつ書いてあってどっちも実行されてるんだろうから

1通だけ送りたいのなら2番目のNet::SMTP...を削れば済むような