Dear all,
I can not make a search using perl.
I get the error:

Couldn't get http://www.google.com/search?q=traducao at browser.pl
line 13.

This is the naked script:

#!/usr/bin/perl

use strict;
use CGI::Carp qw(fatalsToBrowser);
use CGI qw(:standard);
print header;

my $url = 'http://www.google.com/search?q=traducao';
 # Just an example: the URL for the most recent /Fresh Air/ show

  use LWP::Simple;
  my $content = get $url;
  die "Couldn't get $url" unless defined $content;

  # Then go do things with $content, like this:

print $content;


-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to