in reply to How to send data to 2 websites (was:Can anyone help?)
or, to go all-out,#!/usr/bin/perl -w use strict; use LWP::Simple; my $result = get("http://server.com/document?param=value");
That enough of a push?#!/usr/bin/perl -w use strict; use LWP::UserAgent; use HTTP::Request; use URI; my $ua = new LWP::UserAgent; my $url = URI->new("http://server.com/document"); $url->query->form(param => 'value'); my $req = HTTP::Request->new(POST => $url); my $resp = $ua->request($req); print STDERR $resp->error_as_HTML() if $resp->is_error();
|
|---|