重寫範例 1
Old
use WWW::Mechanize; use Data::Dumper; my $mech = WWW::Mechanize->new(); $mech->get( "http://google.com" ); print Dumper $mech->links;continued...
use WWW::Mechanize; use Data::Dumper; my $mech = WWW::Mechanize->new(); $mech->get( "http://google.com" ); print Dumper $mech->links;continued...
Copyright © 2006 Yung-chung Lin |