Ako používať premenné v jazyku Perl regulárne výrazy

v Perlu , regulárny výraz , alebo " regex " je reťazec znakov . V mnohých prípadoch , tieto znaky sú uložené v reťazcových premenných . Môžete použiť operátormi Perl a charakteru triedy plniť nejakú úlohu na regulárny výraz , ako je napríklad reťazec párovanie alebo vyhľadávanie a nahrádzanie určitých znakov . Priradenie hodnoty premennej buď v samotnom kóde alebo vyzve užívateľa pre vstup v behu a potom používať tieto výrazy v charaktere zodpovedá sekvencii . Pokyny dovolená 1

Otvorte súbor programu v Perlu . . Vložte kurzor tam , kde chcete použiť regulárne výrazy
2

zadajte nasledujúci kód :

môj $ cat = " Moja mačka porodila tri mačiatka ! " ;

print $ cat . " \\ N " ;

$ cat = ~ s /tri /štyri /;

print $ cat . " \\ N " ;

Prvý riadok nastaví hodnotu danej premennej a druhý riadok sa vytlačí na obrazovku . Tretí riadok používa operátor substitučnú nahradiť " tri " v premennej s " štyri . " Ak prevádzkovateľ nemôže nájsť zodpovedajúce vzorka ( " tri " ) , nič to nemení hodnotu premennej vôbec
3

zadajte nasledujúci kód : .

Tlač " Niečo napíšte : " ;

my $ input = < > ;

if ( $ vstup = ~ m /e /i ) { print " Čo ste zadali obsahoval písmeno" e " " ; }

else { print " to , čo ste zadali neobsahuje písmeno ' e ' " ; }

Prvé dva riadky vyzve užívateľa na zadanie reťazca a uloží záznam do premenná . If používa operátor zápasu , či používateľ napísal písmeno " e " . " I" súčasťou prevádzkovateľa hovorí operátor ignorovať prípad . Zmeňte to " s " sa malé a veľké písmená
4

vytlačiť " Zadajte telefónne číslo : " ; .

My $ telefón = < > ;

if ( $ telefón = ~ /\\ d \\ d \\ d - \\ d \\ d \\ d \\ d /) { print " ste správne zadali telefónne číslo " ; }

else { print " Ty nie sú správne zadali telefónne číslo " ; }

používa znak triedy pre kontrolu vstupu reťazec , či to zodpovedá formátu pre telefónne číslo a potom povie užívateľa , ak to urobil , alebo nie zadať číslo správne . " \\ D " tried postáv kontroluje výrazy pre čísla . Môžete tiež použiť " \\ w " pre kontrolu všetkých znaky alebo " \\ s " pre kontrolu medzerou . Použitie veľké písmená pre niektorý z týchto troch tried neguje ich reprezentácie .
5

Uložte súbor programu Perl .

• Predchádzajúca strana: Ako odstrániť medzery v Perlu 
• Ďalšia strana: Ako používať Perl získať Epoch Dátum