WWW::Contact::CN::163 - Get contacts/addressbook from mail.163.com
use WWW::Contact;
my $wc = WWW::Contact->new();
my @contacts = $wc->get_contacts('itsa@163.com', 'password');
my $errstr = $wc->errstr;
if ($errstr) {
die $errstr;
} else {
print Dumper(\@contacts);
}
Get contacts from mail.163.com. Extends WWW::Contact::Base
WWW::Contact, WWW::Mechanize, HTML::TokeParser::Simple
Fayland Lam, "<fayland at gmail.com>"
Copyright 2008 Fayland Lam, all rights reserved.
This program is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.