Hola amigos,
tengo este trozo de codigo y me gustaria saber por que me da el siguiente error:
500 Can't connect to
www.ua.es:80 (connect: Unknown error)
el codigo implicado es este:
#!/rafa/Perl/bin/perl
use WWW::Mechanize;
use DBI;
use DBD::mysql;
use HTML::TokeParser;
use Data::Dumper;
use HTML::Form;
$dbh = DBI->connect("dbi:mysql:dbname=nombrebd", "usuario", "clave");
my $mech = WWW::Mechanize->new();
my $url = 'http://www.ua.es';
$response = $mech->get( $url );
if ($response->is_success) {
print $response->content;
}
else {
print STDERR $response->status_line, "\n";
}
Me podriais ayudar?
gracias de antemano
PD: por si tiene algo que ver, indico que intento navegar a traves de un proxy. Aunque no me da problemas cuando intento navegar con un navegador normal como Firefox o IE