Con system, por ejemplo...
- Código: Seleccionar todo
system( 'php', '-r', 'echo "Hola\n";' );
O con qx:
- Código: Seleccionar todo
print qx(php -r 'echo "Hola\n";' );
Naturalmente, el ejecutable php debe estar en el PATH para que le encuentre Perl...
Otra opción es usar algún módulo, como por ejemplo el
PHP.pm:
- Código: Seleccionar todo
use PHP;
PHP::eval('echo "Hola\n";');
Este módulo tiene cosas muy interesantes. No dejes de mirarlo.
Otro es
PHP::Include, para incluir pequeños programas PHP dentro del código del Perl, pero parece que está un poco verde.
Otro es
PHP::Interpreter- Código: Seleccionar todo
use PHP::Interpreter;
my $php = PHP::Interpreter->new();
$php->eval(' echo "Hola\n"; ');
$php->echo("Hola\n");
$php->include("mi_script.php");
que parece que es mucho mejor, ya que se pueden pasar diréctamente las variables de PHP a Perl y viceversa, o incluso ejecutar código Perl dentro del de PHP.
- Código: Seleccionar todo
<?php
$perl = Perl::getInstance();
$perl->eval(q^
for( reverse(1..10) ) {
print "$_ segundos para el despegue.\n";
sleep 1;
}
^);
?>
Si pruebas alguno, dinos lo que te parecen...