Voornaam :

Achternaam
:

< input type = " submit " >

< /form Aanmelden>

< /body > Telefoonkaarten

< /html > kopen van 2

Gebruik de teksteditor om een nieuw bestand met de naam process_php.php maken . Dit bestand wordt aangeroepen wanneer de gebruiker invult en legt het formulier in process_php.html . Het script neemt de waarden van de voornaam en de achternaam velden en print ze uit als HTML . Opslaan process_php.php naar de webserver

$ voornaam = $ _POST [ ' voornaam ' ] ; . ?

$ Last_name
= $ _POST [ ' achternaam ' ] ;

echo
" De eerste naam is" . $ voornaam ;

echo
" De laatste naam is" . $ last_name ;

>

bewerken process_php.html 3 ? . Wijs de actie op het formulier om process_php.php . Gebruik het kenmerk methode om aan te geven dat het moet worden ingediend bij de POST methode en sla het bestand op .

< Formulieractie
= " process_php.php " method = "post " >

voornaam
:

Achternaam
: < ingangsnaam = " last_name " type = " text " >

< /form Aanmelden>

< /body
> < br >

< /html >
4

met behulp van een webbrowser om toegang te krijgen vanaf de webserver , geopend process_php.html . Vul het formulier in en klik op " Verzenden" om de gegevens te verwerken .
Schrijven van een Perl-script voor Data PostVerwerking
5

Open een tekstverwerker en maak een webpagina met een vorm geschreven in HTML . Deze vorm heeft twee invoervelden : een voor straatnaam van de gebruiker en een voor de gebruiker postcode . Voeg een submit knop onder de twee invoervelden . Noem het bestand process_perl.html en opslaan op een webserver .

straat Naam :

postcode
:

< input type = " submit " >

< /form Aanmelden>

< /body > Telefoonkaarten

< /html >
6

Gebruik de teksteditor om een nieuw bestand met de naam process_perl.pl maken . Dit bestand wordt aangeroepen wanneer de gebruiker invult en legt het formulier in process_perl.html . Het script neemt de waarden van de straatnaam en de velden postcode en drukt ze af als HTML . De eerste regel in het script is het pad naar PERL op de webserver . Opslaan process_perl.pl naar een webserver .

# ! Path_to_perl

if ( $ ENV { ' REQUEST_METHOD ' } eq ' POST ' ) {

lezen ( STDIN , $ buffer , $ ENV { ' CONTENT_LENGTH ' } ) ;

@ kvs = split ( /& /, $ buffer ) ;

foreach $ kvs
( @ kvs ) {

( $ name , $ value ) = split ( /= /, $ kvs ) ;

$ FORM { $ name} = $ value ; }

} < br

afdruk > " Content-type : text /html \\ n \\ n " ;

druk
"