|
|
|
メール投稿ができるようになりました。
やっぱりサーバー側では規制していなかったようです。
Socketは使えないようだが。
IO::Socketを使って通信。
結局ソースが悪かった様子。
普通は
print $SOCKET "USER $username\r\n";
print $SOCKET "PASS $passwd\r\n";
print $SOCKET "LIST\r\n";
で通るはずなのに、
print $SOCKET "USER $username\r\n";
print $SOCKET "PASS $passwd\r\n";
$buf = <$SOCKET>;
print $SOCKET "LIST\r\n";
としなくては通らないのさ。
なぜか。
詳しくは分からん。
とりあえず使えるようになったからいいか。
|
|
|