#!/usr/local/bin/perl # # simple finger script # # # you can replace anything between the `ticks` to be any unix command # executable on your system. One thing to remember, though, is special # characters such as "@" must be escaped with a backslash, because @ # and % and various other characters mean something special to perl. # @junk = `finger kira\@metronet.com`; print "Content-type:text/html\n\n"; # Here's a neat way to add html to your output without having to put # it all inside print "whatever" tags. print <Finger Info of kira\@metronet.com

finger kira\@metronet.com


EndOfHtml ; print "
";
print @junk;
print "
";