foreach my $line (@results)
  {
     my ($first, $second, $third) = split(/::/, $line);
     print "ERROR: \$third is empty!\n" unless $third;
     print qq(<b>$first</b> <a href="$second&a=$first&t=$third">$third</a><br>);
  }