perlでSMTPサーバを指定してメール送信（TLS/SSL接続も可） - igreks開発日記とりあえずサンプルスクリプト↓ ----------------------------------------------------------------------- use strict; use CGI::Carp qw(fatalsToBrowser); use Net::SMTP; use Net::SMTP::SSL; use Net::SMTP::TLS; use Encode qw(from_to encode); #メールアドレス設定 my $from = 'hoge@gmail.com'; my $mailto= 'huga@nantoka.com'; #件名設定 my $subject = 'SMTPを指定してメール送信！'; from_to($subject, 'shiftjis', 'iso-2022-jp'); encode('
