Cómo pasar las aportaciones de PHP para Perl

Cuando se programa para la Web, puede utilizar PHP en una parte de su sitio web o aplicación y Perl en otro para procesar diferentes funciones y llevar a cabo diferentes tareas. Es posible pasar datos y argumentos entre PHP y Perl, ambos de los cuales lenguajes de script que se pueden utilizar para crear aplicaciones dinámicas de Internet. Es común para los dos que se encuentran en el mismo entorno de desarrollo, por lo que saber cómo hacer las dos lenguas interactúan pueden ser útiles.

Instrucciones

1 Abra el archivo PHP que desea editar en un editor de texto sin formato como Bloc de notas o una aplicación de programación tales como Zend Studio.

2 Iniciar la interacción con Perl llamando dos funciones y el argumento inicial como se demuestra en el ejemplo de código siguiente:

! / / / Bin / perl locales usr

chomp ($ which_file = @ argv [0]);

chomp ($ split_val = @ ARGV [1]);

si (longitud ($ which_file) == 0 || longitud ($ split_val) == 0)

{Print "Hello World! \ N";}

3 Proporcionar la alternativa para el argumento en PHP de la siguiente manera:

más

{

if (! $ -e which_file)

{print "$The World isn't around right now\n";}

más

{

abierta (spfile, "& lt; $ which_file") or die ( "No se puede leer $ which_file");

$ Temp_var = & lt; spfile>;

cerca spfile;

@ Split_arr = split (/ $ split_val /, $ temp_var);

$ = $ New_file which_file. "División".;

abierta (newf, "> $ new_file") or die ( "No se puede crear new_file $");

cerca newf;

}

}

4 Guarde el archivo PHP y subirlo a su servidor Web para probarlo en el entorno de producción.