作者LiloHuang (筑梦踏实)
看板perl
标题Re: [问题] 连上一个有 form 的网页按确定
时间Tue May 8 13:56:17 2007
※ 引述《higoodman (我是正好人)》之铭言:
: 小弟有一支 asp 程式按下确定後会自己做一些事,要定期去按,
: 但我会忘记,所以想说 perl 能否做到 "自动连到该网址按下 submit" 这样的动作
: 可以请先进指点一下吗?若不行,是否有其他可以达成的方式,谢谢
use WWW::Mechanize;
my $mech = WWW::Mechanize->new();
$mech->get( $url );
$mech->follow_link( n => 3 );
$mech->follow_link( text_regex => qr/download this/i );
$mech->follow_link( url => '
http://host.com/index.html' );
$mech->submit_form(
form_number => 3,
fields => {
username => 'mungo',
password => 'lost-and-alone',
}
);
$mech->submit_form(
form_name => 'search',
fields => { query => 'pot of gold', },
button => 'Search Now'
);
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.113.235.115
1F:推 higoodman:谢谢两位帮忙 :) 05/08 15:05