PDA

View Full Version : all your CGI's are belong to phpdev5

firepages
07-23-2002, 06:06 AM
Hi, bit the bullet and decided to do a mod_perl bundle of phpdev - it should include most of the common modules etc.

Not being a PERL head and only playing with PERL when converting to PHP :) -or when I absolutely have to... I could really do with some example scripts to package with the bundle - any offers?

they need to be simple and just show a particular feature but anything is very much appreciated, please post them here or mail to me at perl@firepages.org
Spookster
07-23-2002, 06:49 AM
Ok here is my contribution. Simple and effective:


#!/usr/bin/perl
print "Content-Type: text/html\n\n";
print "<HTML>\n";
print "<HEAD>\n";
print "<TITLE>Perl Test Page</TITLE>\n";
print "</HEAD>\n";
print "<BODY>\n";
print "<H3>This is a test to see if Perl is Working</H3>\n";
print "<P>\n";
print "<H5>If you can see this, Perl is properly configured</H5>\n";
print "<BR>";
print "<H1>Now go learn PHP you fool</H1>\n";
print "</BODY>\n";
print "</HTML>\n";



:D
Mouldy_Goat
07-24-2002, 06:58 PM
Well, this one's always useful:

#!/usr/bin/perl

print "Content-type: text/html\n\n";
print "Time is ",scalar localtime();
print "<BR>\n<B>\%ENV contents:</B><BR><BR>";
while (($key, $value) = each %ENV) {
print "<B>$key</B>: $value<BR>\n";
}

Prints out the environment variables and the time, all sorts of good stuff in there.