本文共 438 字，大约阅读时间需要 1 分钟。
http://search.cpan.org/~jesse/WWW-Mechanize-1.72/lib/WWW/Mechanize/Examples.pod
#!/usr/bin/perluse WWW::Mechanize;my $mech = WWW::Mechanize->new();$url = 'http://localhost/form.php';$mech->get( $url ); $mech->submit_form( form_number => 1, fields => { fname => 'www', lname => 'mechanize', } );print $mech->content(); 原文出处：Netkiller 系列 手札 本文作者：陈景峯 转载请与作者联系，同时请务必标明文章原始出处和作者信息及本声明。