Hello and welcome to our community! Is this your first visit?
Register
Enjoy an ad free experience by logging in. Not a member yet? Register.
Results 1 to 3 of 3
  1. #1
    Super Moderator
    Join Date
    May 2002
    Location
    Perth Australia
    Posts
    4,040
    Thanks
    10
    Thanked 92 Times in 90 Posts

    all your CGI's are belong to phpdev5

    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
    resistance is...

    MVC is the current buzz in web application architectures. It comes from event-driven desktop application design and doesn't fit into web application design very well. But luckily nobody really knows what MVC means, so we can call our presentation layer separation mechanism MVC and move on. (Rasmus Lerdorf)

  • #2
    Supreme Overlord Spookster's Avatar
    Join Date
    May 2002
    Location
    Marion, IA USA
    Posts
    6,273
    Thanks
    4
    Thanked 83 Times in 82 Posts
    Ok here is my contribution. Simple and effective:

    Code:
    #!/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";

    Spookster
    CodingForums Supreme Overlord
    All Hail Spookster

  • #3
    Regular Coder
    Join Date
    Jul 2002
    Location
    London, UK
    Posts
    126
    Thanks
    0
    Thanked 0 Times in 0 Posts
    Well, this one's always useful:

    Code:
    #!/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.


  •  

    Posting Permissions

    • You may not post new threads
    • You may not post replies
    • You may not post attachments
    • You may not edit your posts
    •