Hvordan passere innspill fra PHP til Perl

Ved programmering for web, kan du bruke PHP på en del av din nettside eller applikasjon og Perl i et annet for å behandle ulike funksjoner og utføre forskjellige oppgaver. Det er mulig å overføre data og argumenter mellom PHP og Perl, som begge er skriptspråk som kan brukes til å lage rike Internett-applikasjoner. Det er vanlig at både å bli funnet i samme utviklingsmiljø, så vet hvordan du gjør de to språkene samhandler kan være nyttig.

Bruksanvisning

1 Åpne PHP-filen som du vil redigere i en vanlig tekstredigeringsprogram som Notisblokk eller et programmeringsprogram som Zend Studio.

2 Initiere interaksjon med Perl ved å kalle to funksjoner og den første argument som vist i eksempelet med koden nedenfor:

! / Usr / local / bin / perl

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

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

if (lengde ($ which_file) == 0 || lengde ($ split_val) == 0)

{Print "Hello World \ n";}

3 Gi alternativ for argumentet i PHP som følger:

ellers

{

if (! -e $ which_file)

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

ellers

{

open (spfile, "& lt; $ which_file") or die ( "Kan ikke lese $ which_file");

$ Temp_var = & lt; spfile>;

nær spfile;

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

$ New_file = $ which_file. "Split.";

open (newf, "> $ new_file") or die ( "Kan ikke opprette $ new_file");

nær newf;

}

}

4 Lagre PHP-filen og laste den opp til webserveren til å teste den i produksjonsmiljøet.