Select Code to Download

#!perl
print "Content-type: text/plain; charset=iso-8859-1\n\n";
...
    $val =~ s|"|\\"|g;
    print "${var}=\"${val}\"\n";
}

#!/usr/bin/perl --
use CGI();
use Data::Dump qw/ dd pp /;
...
        [ $q->start_html, $q->Dump, $q->end_html, ],
    ];
};

for ( 1 .. 10 ) {
...
    );
}

            Rate apache2cgi       psgi
apache2cgi 194/s         --       -23%
...
            Rate       psgi apache2cgi
psgi       275/s         --       -17%
apache2cgi 332/s        21%         --