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.