jueves, 18 de julio de 2013

Usar funciones de PHP desde Perl fácil



A veces se hace necesario llamar a funciones de php desde un programa en perl. Eso es posible haciendo lo siguiente.

Creamos el archivo test.php con:

<?php

function testPHP($value){
    echo "Pruyeba111 de PHP:" . $value;
}

?>


Luego creamos el archivo perl que usara la función de php y nos queda así:

#!/usr/bin/perl
 
my $res = `php -r '
 
include_once "test.php";
 
testPHP ("\n\nTEEST2\n\n");
'
`;
print "\n\nResultado: $res";


Observar que la comilla en la línea de my $res= es una comilla simple que se usa en perl para ejecutar instrucciones de "afuera" del perl, es similar a escribir por consola o una llamada a la función "system(xxx)" de perl.


No hay comentarios:

Publicar un comentario