Hola a todos, en este día estuve programando unas cosas y tenía un problema: necesitaba comparar el código fuente a ver si eran iguales y al parecer no comparaba bien el código fuente o hay algún error.
Este es mi código:
use LWP::UserAgent;
use HTTP::Request;
my $ua = new LWP::UserAgent;
$ua->agent("Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201 Firefox/2.0.0.12");
my $com1 = new HTTP::Request GET =>"http://start.ubuntu.com/9.04/";
my $com2 = new HTTP::Request GET =>"http://www.google.es/"; ...