推 higoodman:謝謝兩位幫忙 :) 05/08 15:05
※ 引述《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