#!/usr/bin/perl
print "Content-type: text/html\n\n";
print "\n
ITS Intranet - Printers List\n";
print "\n";
print "\n";
print "\n";
print " ";
print " ";
print "
";
print "\n";
print "Printers ";
print "<\/FONT>";
print "\n";
print "This document is also available on all unix machines through the /usr/local/bin/printers (with /usr/bin/printers sym link) script.\n";
print "<\/FONT>";
@output = `/usr/local/bin/printers`;
print "\n";
print "@output";
print "<\/PRE>\n";
print "<\/BLOCKQUOTE>";
print "<\/TD><\/TR><\/TABLE>\n";
print "<\/BODY>";
print "<\/HTML>";
|