Perl fra php

Man kunne:

if ($a=exec('perl hejsa.pl',$output)) {
  echo "Udført<br>\n";
} else {
  echo "Fejl $a<br>\n";
}

for ($i=0;$i<count($output);$i++) {
  echo "$i $output[$i]<br>\n";
}

Hvor hejsa.pl indholder

for ($t=0;$t<=10;$t++) {
  print "$t små cyklister var...\n";
}

På din maskine skal du nok eksperimentere med om du kunne nøjes med 'hejsa.pl', om
du skal skrive den fulde sti på Perl-fortolkeren, etc. etc. Men ovenstående er lige prøvet
på Apache, W95, PHP3.

Det eneste hage ved dit forslag er at det (på min computer: apache w98 php3) åbner et perl-dos vindue.
Jeg roddet lidt rundt på nettet i nat og fandt en rutine hos PHP Builder som udføre jobbet - omend lidt kompliceret. Jeg har omskrevet rutinen til en funktion der ser ud som flg:

function RunCGI($file) {   
    $path = "http://". getenv('HTTP_HOST') ."/$file";
    $filename = basename($path);
   
    $data = implode("\n",file($path));
   
    $tempfile = fopen($filename.".tmp","w");
    fwrite( $tempfile,"$data");
    fclose($tempfile);
    include ($filename.".tmp");
   
    unlink($filename .".tmp");
}

Funktionen virker fint, men jeg kan ikke helt gennemskue hvorfor det er nødvendigt at oprette en midlertidig fil...
Men så'n er der jo så meget

Hmm, det gør den nu ikke ved mig. Men hvis du i sidste ende skal køre
det på et web-hotel, kan det jo være ligegyldigt.