http://qs1969.pair.com?node_id=43959


in reply to Hitting a web page

Use LWP::UserAgent.
#!/usr/bin/perl -w use strict; use LWP::UserAgent; use URI::URL; my $ua = new LWP::UserAgent; my $uri = new URI::URL "http://www.perlmonks.org"; $uri->query_form("node_id" => "43958"); my $req = new HTTP::Request GET => $uri->as_string; my $res = $ua->request($req); if (!$res->is_success) { die 'Fetch failed'; } my $content = $res->content; print $content;