Perl i PHP

ima li nachin da vkaram v .pl fail rezultata ot deinsota na PHP skript

kazano po obstoino imam PHP skript koito generira HTML kod ot roda na

<a href="[линк]">Hello</a>
<a href="[линк]">This is very cool link</a>

ta iskam tozi rezultat da se pokaze kogato se poseshtava .pl faila


njakakvi idei ?

Malko po tochno : iskash kato izvikash t.pl da se izpulnqwa t.php ili iskash kato izvikash t.pl toi da wika t.php, da mu wzima rezultata, da prawi neshto s nego i da go wrushta?

Eto edin variant pod Linux:

my $htmlresult = `links [линк] --source` ;

ili

my $htmlresult = `lynx [линк] --source` ;


Tova vika command-line browser-a links (ili lynx, po-starata versiq na links). Trqbva da ti e instaliran. Ima i versii za Windows.

(Operatora `` ima syshtata funkciq kato v shell-skriptovete - izpylnqva shell-komanda) Ama .pl skripta shte ti e baven.

Drug variant e da izpolzvash modula LWP.

Naprimer:

use LWP::Simple;
$content = get("[линк]";);
die "Couldn't get it!" unless defined $content;


Jivko

Ako si na sushtata mashina mojesh da go pravish i po tozi mnogo prost nachin ot perl scripta
open(P,"php4 pesho.php |"); while(<P>) { print;}; close(P);

Вкарвай изхода от .php скрипта в template, който ще се използва от .pl скрипта ... или по начина на Пенчо :]

...всички ще врите в Ада! муахахахахахаха }:-]