#!/usr/local/bin/perl print "Content-type: text/html\n\n"; print "\nTest\n\n"; print "\n

Test

\n"; print "

bar

\n"; $myvar = `cat /com/doc/web/projects/cva/baz.date`; print("

", $myvar, "\n"); print("

", `date`, "\n"); print "

\n"; print "\n";