foreach my $line (@results)
{
   my ($first, $second, $third) = split(/::/, $line);
   print qq(<b>$first</b> <a href="$second&a='$first'&t='$third'">$third</a><br>);
}