eval {

local $SIG{ALRM} = sub { die("alarm\n") };

alarm 60;
&parsePageFunction();
alarm 0;
};#eval

if($@) {

if($@ eq "alarm\n") { print("Webpage Timed Out.\n\n"); }#if
else { die($@."\n"); }#else
}#if

##</code><code>##

eval {
	local $SIG{ALRM} = sub { 
		die("alarm\n");
	};

	alarm 60;
	parsePageFunction();
	alarm 0;
};

if ($@) {
	if ($@ eq "alarm\n") { 
		print("Webpage Timed Out.\n\n");
	} else { 
		die($@."\n");
	}
}