1 <a href="lookup">YARRG</a> -
2 Yet Another Revenue Research Gatherer
12 my $name= $m->request_comp()->name();
14 while (s/^(\w+)\t(.*)$//m) {
15 my ($tname, $thtml) = ($1,$2);
16 if ($tname eq $name) {
17 print "| <b>$thtml</b>\n";
19 print "| <a href=\"$tname\">$thtml</a>\n";