I Perl , et vanlig uttrykk , eller " regex , " er en streng med tegn . I mange tilfeller er disse tegnene lagret i strengvariabler . Du bruker Perl operatører og karakter klasser å utføre noen oppgave på en regex , for eksempel streng som passer eller søke etter og erstatte bestemte tegn . Tilordne verdier til variabler enten i selve koden eller be brukeren om innspill på kjøre- tid og deretter bruke disse uttrykkene i karakter matchende sekvens. Instruksjoner
en

Åpne et Perl program fil . Sett markøren der du ønsker å bruke vanlige uttrykk
2

Skriv inn følgende kode :

min $ cat = " Katten min fødte tre kattunger ! ";
.

print $ katt . "\\ n";

$ cat = ~ s /tre /fire /;

print $ katt . "\\ n";

Den første linjen angir en variabel og den andre linjen skriver den til skjermen. Den tredje linjen bruker substitusjon operatøren å erstatte " tre" i variabelen med "fire ". Hvis operatøren ikke kan finne mønsteret som passer ( "tre ") , betyr det ikke endrer variabelens verdi i det hele tatt
3

Skriv inn følgende kode : .

Print "Type noe: ";

min $ innspill = < > ;

if ( $ innspill = ~ m /e /i ) { print " Hva du skrev inneholdt bokstaven ' e ' "; }

else { print" hva du skrev ikke inneholde bokstaven ' e ' "; }

de to første linjene be brukeren om å skrive inn en streng og lagrer inntreden i en variabel. Hvis setningen bruker kampen operatøren å se om brukeren har skrevet bokstaven " e ". «I» del av operatøren forteller operatøren å se bort fra saken. Endre den til "s" til å være case- sensitive
4

print " Skriv inn et telefonnummer: "; .

Min $ telefon = < > ;
< p> if ( $ telefon = ~ /\\ d \\ d \\ d - \\ d \\ d \\ d \\ d /) { print " Du har riktig angitt et telefonnummer "; }

else { print " Du har ikke riktig angitt et telefonnummer "; }

Dette bruker tegnklasser å sjekke strengen innspill for å se om det samsvarer med formatet for et telefonnummer og deretter forteller brukeren om han gjorde eller ikke angi et tall riktig . De " \\ d" tegnklasser sjekker uttrykk for tall . Du kan også bruke "\\ w " for å se etter eventuelle tegn eller "\\ r " for å se etter mellomrom . Ved hjelp av funksjonen for store for noen av disse tre klassene fornekter sine fremstillinger .
5

Lagre Perl programfilen.