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