[vox-tech] Getting https with perl

[Jim Angstadt]

--- Ken Herron <Kherron@newsguy.com> wrote:
> --On Tuesday, July 01, 2003 16:41:08 -0700 Jim
> Angstadt 
> <jimajima9@yahoo.com> wrote:

<snip>

>   my $response = $ua->request($req) or die ...;
> 	print $response->content;

Hi Ken,

Thanks for the help.  It worked just as you, and
the manual, said:  

my $ua = LWP::UserAgent->new(timeout => 20,)
 or die "Cannot create UserAgent: $! \n";

my $req = HTTP::Request->new('GET', $url)
  or die "Cannot create Request: $! \n";

my $res  = $ua->request($req ) 
  or die "Cannot get request: $! \n";

my $html = $res->content;  # Thanks Ken

I sure appreciate the assistance.

Thanks, 
Jim


__________________________________
Do you Yahoo!?
SBC Yahoo! DSL - Now only $29.95 per month!
http://sbc.yahoo.com