perl POP3 MyDNS - (ヽ´ω`)　

MyDNSでお勧めソフト「biffpop」が落とせなくなっていてどうしようかと思ったが、
よく考えたら、作れば良いということに気づいた orz

Net::POP3でつくって、cron設置。

こんな感じでつくってやればOK。

#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

use Net::POP3;

my $host     = "mail.MyDNS.JP";
my $id       = "IDDAYO";
my $password = "PASDAYO";

my $pop = Net::POP3->new($host);
$pop->login( $id, $password );
$pop->quit;

http://search.cpan.org/~gbarr/libnet-1.21/Net/POP3.pm

rubyなら１行で楽に行けることに今気づいた。orz

http://www.ruby-lang.org/ja/man/?cmd=view;name=net%2Fpop