I have got a simple script that is straight out of the man page for Tie::Google. My problem is the script simply hangs. I bet this is because it is not able to use the environment proxy variables
I have set my proxy ( requires no auth ) as export http_proxy=http://myproxy:80 ( I am using a linux machine .. I dont think that matters ) #!/usr/bin/perl # # use strict; use Tie::Google; my $KEYFILE = glob "~/.googlekey"; my ($g, @g, %g); print $ENV{http_proxy}; # works fine # Tied scalar interface: I Feel Lucky use LWP::Simple qw(getprint); tie $g, "Tie::Google", $KEYFILE, "perl"; getprint($g->{'URL'}); This script simply hangs Any clues ? Thanks Ram -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
