| Code Sample |
| one two three four |
| Code Sample |
| #!/usr/bin/perl -wT print "Content-type: text/html\n\n"; print "Test Page start<P>\n"; $myFile = '/home/dsl/test.txt'; open(MYFILE,$myFile); @myLines = <MYFILE>; close(MYFILE); print @myLines; print "<br>Test page end\n"; |