Hola, estoy haciendo un pequeño script para consultar entradas en la RAE.
El método get() me devuelve el código de la página, el cual envío a un documento .html para después traducirlo usando el módulo HTML::Parser.
#!/usr/bin/perl
use warnings;
use strict;
use LWP::Simple;
use HTML::Parser;
open(my $html, q, "index.html") or die("No se pudo abrir el archivo para escribir. $!");
my $url = "http://buscon.rae.es/draeI/SrvltGUIBusUsual?LEMA=abyecto";
my $codigo = get($url);
print $html "$codigo";
my $p = new ...