#!/usr/bin/perl my $hostname=`hostname -s`; print "Content-type: text/html\n\n"; print < comBOX Login
HTML exit;