Gmail アカウント経由でメールを送信する Perl プログラムを作成しました。
私は NET::SMTP、NET::SMTP::SSL、および Authen::SASL モジュールを使用しています。SMTP ポートを 465 に設定すると、問題なく動作します。
$smtp = Net::SMTP::SSL->new( 'smtp.gmail.com', Hello => 'localhost', ポート => '465', タイムアウト => 30, デバッグ => 1 );
しかし、ある顧客サイトでは、私のプログラムを実行する PC は、インターネットにアクセスするための HTTP 権限しかありません。そのため、上記のコード行は機能しなくなります。(SMTP には、socks を許可する PC が必要だと思います。) Mail::Webmail::Gmail を試しましたが、このモジュールは古すぎて、もう動作しないようです。
このような状況で、Perl で Web アクセスを使用するだけで、Web ブラウザーを開いて Gmail にログインするようにメールを送信することは可能ですか? ありがとうございました！