Jerry Kassebaum <> wrote:

: I would like to automate tvguide.com.
[snip]

: Here's what I have so far:
:
: ************
:
: use LWP;
: $browser=LWP::UserAgent->new;
: $url="http://tvguide.com/";;
: $response=$browser->post($url, ['name'=>'email', 'id'=>'email',
: 'value'=>'[EMAIL PROTECTED]',]);
: print"$response";
:
: *****************

     That looks good, but you need to use strict and warnings.


#!/usr/bin/perl

use strict;
use warnings;

use LWP;

my $browser = LWP::UserAgent->new();
my $url     = 'http://tvguide.com/';
my $response = $browser->post(
                    $url,
                    [
                        name    => 'email',
                        id      => 'email',
                        value   => '[EMAIL PROTECTED]',
                    ],
);



: I get: HTTP::Response=HASH(0x2883cb4)
:
:
: Now what?

    $response is an object as described in LWP.pm. What do you want
to do now?


HTH,

Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328

_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to