$lycos_content =~ |Showing Results <b>\d thru \d</b> of\s*\t* (\d[\d,]*)|s;
my $lycos_results = $1;


if (!defined $lycos_results)
{
   $lycos_results=0;
}