Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte textový editor a vytvorte súbor s názvom " , perlTitle.pl " . Pridať " cirkus " riadok do súboru na prvom riadku . " Shebang " určuje Perl interpret umiestnenie v prípade , že nie je možné nájsť . " Shebang " čiara sa bude líšiť na základe konkrétnej inštalácii Perlu . Nižšie je uvedený príklad :
# /usr /local /bin /perl
2
Uveďte, či perlTitle.pl by mal výstup webovej stránky ( " text /html " ) vytlačením " Content - type " hodnota " text /html " ( zahŕňajú " \\ n \\ n" znakov ) . . Ak chcete vytlačiť výstup , pomocou Perlu " Tlačiť " a vytlačiť otvorený a tag blízko " " na webovej stránke
print " Content - type : text /html \\ n \\ n " print " " print " < /html > " ;
3
načítať všetky hodnoty v reťazci dotazu. Na otázku " reťazec " hodnoty sú všetky hodnoty predložené s webovou stránkou . V tomto príklade sa hodnota v reťazci dotazu je titul používaný pre zmenu hlavičky. Sa hodnoty reťazca dotazu uložiť do premennej s názvom " $ KeyValue " vyhlásenej medzi perlTitle.pl ' s " " a " < /html > " tags :
$ KeyValue = ( $ ENV { " QUERY_STRING ' } ) ;
4
použite funkciu Perl " rozdeliť " rozdeliť reťazec dotazu do dvoch hodnôt ( $ key a $ hodnota ) , umiestnenie rozkol bezprostredne pod " $ KeyValue " ; vyhlásenie . V tomto príklade , $ key je názov Titulová strún ( " title " ) a $ hodnota je hodnota Titulová struny . Použitie znaku " = " rozdeliť " $ KeyValue " reťazec :
( $ name , $ hodnota ) = split ( /= /, $ KeyValue ) ;
5
používania perl " print " Príkaz pre tlač " $ value " premennú na webovej stránke . Uzavrite hodnotu premennej medzi open "
print "
Pomocou príkazu Perl " Tlač " vytlačiť "