Hello Test

sub htmlOut(){ print CGI::header(); print 'Hello Test'."\n"; print $message; sleep (2); print $message; }