綾小路龍之介の素人思考

メールサーバにログイン(受信せず)

use Net::POP3;
my $server = 'pop.mail.yahoo.co.jp';
my $pop3  = Net::POP3->new($server) or die "Can't not open account.";
my $account  = 'ACCOUNT';
my $password = 'PASSWD';
my $count = $pop3->login($account, $password);
   $pop3->quit;
D:\>perl -MNet::POP3 -e "$pop3 = Net::POP3->new('pop.mail.yahoo.co.jp');$pop3->login('ACCOUNT','PASSWD');$pop3->quit;"
D:\>

ソーシャルブックマーク

  1. はてなブックマーク
  2. Google Bookmarks
  3. del.icio.us

ChangeLog

  1. Posted: 2007-10-10T03:32:15+09:00
  2. Modified: 2007-10-10T04:25:21+09:00
  3. Generated: 2017-10-22T23:09:16+09:00