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"; |