#!/usr/bin/perl
print "content-type: text/html \n\n";
# SET UP THE TABLE
print "";
print "";
$b=`/usr/bin/who>>/root/abcd.txt`;
print "$array<a href="?node=1">1</a>\n\n"; # <== FIXME
#print "VALUE IS $b\n\n";
print "";