Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.

Ahhhhh PHP you evil dog... 3 Comments More | Login | Reply /

 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.

  • <?$x='PLP::Tie::Print::PRINT';$w=escapeshellarg($_SERVER[SCRIPT_FILENAME]);
    $z= preg_split("/\n\n/",`perl -e'my\$f=shift;use PLP;\$ENV{PATH_TRANSLATED}=
    \$f;my\$z=\\&$x;*$x=sub{*$x=\$z;PLP::sendheaders};P LP::everything' $w 2>&1`
    ,2);foreach(preg_split("/\n/",$z[0])as$y)header($y);echo$z[1];exit?><::&g t;
      <html>
    <head>
    <title>A PLP (Perl-in-HTML) document in PHP!</title>
    </head>
    <: BEGIN { $header{'Content-Type'} = 'text/html; charset="US-ASCI

    • There mere fact that this exists is both terrifying and intriguing. However you say that there's no POST content and it is terribly slow, not quite what I was looking for since I need to be using quite a bit of POST data and I need the site to be ultra fast.

      I am going to continue to look at this just because i find it interesting. Thanks for the heads up on this, much appreciated.
Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.