🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: chile.comp.programacion
4 messages
4 total messages Started by Miguel Farah F. Wed, 28 Jun 2006 10:45
Invocar Perl desde PHP?
#1706
Author: Miguel Farah F.
Date: Wed, 28 Jun 2006 10:45
32 lines
1604 bytes
Tengo un script en Perl como este:

#!/usr/bin/perl
if (($ARGV[0] eq "1") && ($ARGV[1] eq "2")) {
   $resultado="si";
} else {
   $resultado="no, gracias";
}


Quiero armar una pagina web que reciba dos parametros en un form, los
entregue al script, y una pagina de resultado (en PHP) hace algo con el
string que Perl entrega. Algo como este pseudocodigo:

<h1>resultado</h1>

<? $x=[invocar a Perl con los dos parametros]; ?>

<? if ($x="si" { ?>
<b>anduvo!</b>
<? } ?>


La parte que no tengo clara es como diablos invocar a Perl directamente.


-- 
MIGUEL FARAH              //   NOmigSPuelAM@lj.cl
#include <disclaimer.h>   //   http://www.farah.cl
<*>
"Well, of COURSE I did it in cold blood, you idiot!... I'm a reptile!"
- The Far Side
Re: Invocar Perl desde PHP?
#1709
Author: Alberto Hormazabal
Date: Wed, 28 Jun 2006 13:26
49 lines
1699 bytes
Miguel Farah F. <NOmigSPuelAM@lj.cl> wrote:
> Tengo un script en Perl como este:

> #!/usr/bin/perl
> if (($ARGV[0] eq "1") && ($ARGV[1] eq "2")) {
>    $resultado="si";
> } else {
>    $resultado="no, gracias";
> }


> Quiero armar una pagina web que reciba dos parametros en un form, los
> entregue al script, y una pagina de resultado (en PHP) hace algo con el
> string que Perl entrega. Algo como este pseudocodigo:

> <h1>resultado</h1>

> <? $x=[invocar a Perl con los dos parametros]; ?>

> <? if ($x="si" { ?>
> <b>anduvo!</b>
> <? } ?>


> La parte que no tengo clara es como diablos invocar a Perl directamente.



http://www.zend.com/php5/articles/php5-perl.php


otra opcion:

http://www.thescripts.com/forum/thread836.html

otra mas:

http://cl.php.net/function.exec



PD: AAG!! ;)



-- 
El Tuto

tuto@aalc.lj.cl
Re: Invocar Perl desde PHP?
#1710
Author: JuanCarlitro
Date: Wed, 28 Jun 2006 14:44
39 lines
2027 bytes
Miguel Farah F. wrote:
> Tengo un script en Perl como este:
> 
> #!/usr/bin/perl
> if (($ARGV[0] eq "1") && ($ARGV[1] eq "2")) {
>    $resultado="si";
> } else {
>    $resultado="no, gracias";
> }
> 
> 
> Quiero armar una pagina web que reciba dos parametros en un form, los
> entregue al script, y una pagina de resultado (en PHP) hace algo con el
> string que Perl entrega. Algo como este pseudocodigo:
> 
> <h1>resultado</h1>
> 
> <? $x=[invocar a Perl con los dos parametros]; ?>
> 
> <? if ($x="si" { ?>
> <b>anduvo!</b>
> <? } ?>
> 
> 
> La parte que no tengo clara es como diablos invocar a Perl directamente.
> 
> 

No tengo idea de php, pero buscando en google me apareci� esto

http://am.php.net/manual/en/function.exec.php

Espero te sirva.

-- 
JuanCarlitro
http://forhekset.blogspot.com
"I don't trust anything that bleeds for five days and doesn't die"
  Mr. Garrison
Re: Invocar Perl desde PHP?
#1715
Author: digital
Date: Fri, 30 Jun 2006 21:40
53 lines
2333 bytes
Otra opcion podr�a ser, si el script Perl est� disponible por http:

<h1>resultado</h1>
<? $x= file_get_contents('http://www.tusitio.cl/scriptperl.pl?argumento1=' . 
$valor1 . '&argumento2=' . $valor2); ?>

<? if ($x="si" { ?>
<b>anduvo!</b>
<? } ?>


Eso.
(en todo caso, si cuentas con PHP5, es mucho mejor la opci�n de usar 
PHP::Perl de PHP5)
---
Alejandro V�squez N.
alejandro.vasquez@neurotools.cl
Neurotools - Herramientas Inteligentes

"Miguel Farah F." <NOmigSPuelAM@lj.cl> escribi� en el mensaje 
news:44a25de5@news.vcd.cl...
> Tengo un script en Perl como este:
>
> #!/usr/bin/perl
> if (($ARGV[0] eq "1") && ($ARGV[1] eq "2")) {
>   $resultado="si";
> } else {
>   $resultado="no, gracias";
> }
>
>
> Quiero armar una pagina web que reciba dos parametros en un form, los
> entregue al script, y una pagina de resultado (en PHP) hace algo con el
> string que Perl entrega. Algo como este pseudocodigo:
>
> <h1>resultado</h1>
>
> <? $x=[invocar a Perl con los dos parametros]; ?>
>
> <? if ($x="si" { ?>
> <b>anduvo!</b>
> <? } ?>
>
>
> La parte que no tengo clara es como diablos invocar a Perl directamente.
>
>
> -- 
> MIGUEL FARAH              //   NOmigSPuelAM@lj.cl
> #include <disclaimer.h>   //   http://www.farah.cl
> <*>
> "Well, of COURSE I did it in cold blood, you idiot!... I'm a reptile!"
> - The Far Side 
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads