rc/bin/whois

   1 #!/bin/rc
   2
   3 >[2] /dev/null for(i in $*)
   4         grep '^'$i'     ' /adm/whois ||
   5         grep -i $i /adm/keys.who ||
   6         grep -i $i /adm/netkeys.who ||
   7         grep -i $i /adm/whois ||
   8         grep -i $i /adm/users ||
   9         echo who indeed is $i