![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
現在、さくらのレンタルサーバにてperlスクリプトを稼動しています。
今回、さくらのレンタルサーバのメール認証がPOP before SMTPからSMTP認証(SMTP-AUTH)に変更になりましたので、perlスクリプト内で自動メール送信させるのにNet::SMTP::TLSモジュールを利用することにしました。そこで
(1)SMTPサーバー名、ポート番号、ユーザー名、パスワードを設定する
(2)宛先などの必要な設定をする
(3)メール内容を設定する
(4)メールヘッダを設定する
(5)メールを送信する
という流れで現在perlスクリプトを以下のように記述しました。
#!/usr/bin/perl
use CGI::Carp qw(fatalsToBrowser);
use Net::SMTP::TLS;
use Authen::SASL;
my $smtp = Net::SMTP::TLS->new($mailhost,
Port => $mailport,
User => $mail_username,
Password => $mail_password
);
$smtp->mail($from_mail);
$smtp->to($tomail);
$smtp->data();
$smtp->datasend($header);
$smtp->datasend($message);
$smtp->dataend();
$smtp->quit;
変数の値は割愛していますが、
上記のスクリプトは、POP before SMTPの時は問題なくメール送信できたのですが、サーバのメール認証がSMTP認証(SMTP-AUTH)に変更になってからは以下のようなエラーが出ます。
invalid SSL_version specified at /usr/local/perl/5.8/lib/perl5/site_perl/5.8/IO/Socket/SSL.pm line 418
何か間違いであるとか、他に必要な設定がありますでしょうか?
宜しくご教授お願いいたします。
No.1ベストアンサー
- 回答日時:
上記のページに、今回の質問と同じトラブルが取り上げられています。とりあえず、バージョンを調べてみてはどうでしょうか。それで、原因が同じであれば、サポートに解決を依頼する必要があるかも?
この回答への補足
早速の回答ありがとうございます。
いただいた参考URLをじっくり読んでみます。
じつはhttp://oshiete.goo.ne.jp/qa/8354111.htmlにも質問したのですが、さくらのレンタルサーバのOSがバージョンアップしてからこのようなことがあります。そしてcpanも利用できなくなりました。何か考えられる事があれば教えていただきたいです。
宜しくお願いいたします。
No.3
- 回答日時:
上記のページ等で、別の解決方法が紹介されています。Net::SMTP::TLS 内のサブルーチンを修正する方法です。元のファイルは修正不可でしょうから、コピーして修正することはできないでしょうか。
以下は、私が利用している Net::FTP でのテストです。プログラムのあるディレクトリに Net サブディレクトリを作り、そこに FTP.pm をコピーしたところ、プログラムは問題なく動作しました。
use lib '.'; # @INC の先頭をカレントディレクトリに
use Net::FTP;
print $INC{'Net/FTP.pm'}, "\n"; # 読み込まれたモジュールの確認
$ftp = Net::FTP->new('192.168.x.x');
$ftp->login('anonymous') or die "Can't connect: $@";
print join(', ', $ftp->ls), "\n";
$ftp->quit;
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
openした後、closeしないでプロ...
-
bashスクリプト
-
perlをバージョンアップしたら...
-
テキストファイルで提出とは?
-
Perlで特定文字列から特定文字...
-
英数文字列のうちの数値を4桁に...
-
INDIRECT 横に再度抽出したい
-
Perlのエラーについてご教授く...
-
Perl の外部モジュールの利用方法
-
こんにちは ブラケッツでプログ...
-
結構急ぎです 友達の誕生日に 4...
-
Perl フォルダまでのパスでペー...
-
python 3を使えるようになりたい
-
Perl言語について。
-
ファイルをディレクトリ分配の...
-
アルファベットに付いて質問し...
-
#!/usr/bin/perlで書きだしたCG...
-
perlのflock関数でロックをかけ...
-
AI sisterとは、偽物の人ですか?
-
ファイルアイコンの左下に緑の□...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Perl メール件名について
-
Net::SMTPでメール配信できる限...
-
cgi 実行時のエラー
-
PerlでSMTP-AUTH認証をする
-
DelegateでPOP3、SMTPのリバー...
-
Net::SMTPでのメール送信について
-
perlでSMPT認証してメールを送...
-
添付ファイルはファイルでなけ...
-
Perlでのメール添付送信のエラー
-
ASP.netについて
-
ビジネスメールの敬称
-
テキストボックスの番号を使っ...
-
エクセルVBA テキストボックス...
-
DATE型変数を初期化する方法
-
初歩的な事だと思います。 Sub...
-
Excel-VBAでInputBox+Pulldown...
-
お問い合わせフォームから送信...
-
数字以外の入力をエラーにする...
-
EXCEL VBA で指定した範囲に入...
-
VBAでInputBoxの再入力をさせる...
おすすめ情報