print "content-type:text/html\n\n";
#print ค่าของตัวแปร
print "Server $ENV{'SERVER_NAME'}\n\n";
#print ตัวอักษรด้วย (')
print 'We are running Perl version:';
print $^V."\n\n";
#print multiline
print <
The perl script : $0
EOF
Dark Machine :: Gray Programming :: White Human
0 comments:
Post a Comment