1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/not-used/about.pl	Wed Dec 30 02:01:25 2009 -0500
     1.3 @@ -0,0 +1,16 @@
     1.4 +#!/usr/bin/perl
     1.5 +
     1.6 +
     1.7 +sub gen
     1.8 +{
     1.9 +open FILE, "<./about.php";
    1.10 +return do { local $/; <FILE> };
    1.11 +
    1.12 +};
    1.13 +
    1.14 +print "Content-type: text/html\n\n";
    1.15 +
    1.16 +$rr = &gen();
    1.17 +print "\n";
    1.18 +print $rr;
    1.19 +print "\n";