"$Bill Luebkert" <[EMAIL PROTECTED]> wrote on 05/18/2004 03:40:07 PM:
> [EMAIL PROTECTED] wrote:
>
> > my $form = HTML::Form->parse(
> > $ua->request(
> > HTTP::Request->new(GET => 'https://pcme0022c/ttransmit.html')
> > )
>
> Don't you need a base URL here as the second arg ?
>
Shouldn't. This is almost directly from the pod for HTTP::Response
$response = $ua->request($request)
and this is from pod for HTML::Form
my @forms = HTML::Form->parse($response);
I did originally have something like this through:
my $form = HTML::Form->parse($response->content,$response->base)
And I still got the same error trying to submit the form.
---
EOM:
JMP 0000 ; SHOWING MY AGE :)
0079****SIG 01[010]Richard Morrison[020]Programmer[030]I bring e-files to life#
_______________________________________________ Perl-Win32-Web mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs