The Perl "m" -funksjonen brukes til å matche en streng i en variabel eller fil . Dette er nyttig hvis du prøver å finne en bestemt linje i en fil , for eksempel en advarsel linje i en loggfil . Den kan også brukes til å kontrollere at en bruker- verdi innsendt inneholder riktig informasjon. Du kan matche en bokstavelig streng eller du kan bruke vanlige uttrykk --- en måte å bruke metategn å representere et tegn eller bokstaver. Instruksjoner
en
Åpne et vanlig tekstdokument i en tekst editor.
2
Type linjen
#! /Usr /bin /perl
å starte perl script
3
Type linjene
min $ my_string ;
$ my_string = " Dette er et eksempel streng " ; .
print $ my_string " \\ n ";
å lage og skrive ut den variabelen som inneholder strengen" . Dette er et eksempel string "
4 < p > type linjene
if ( $ my_string = ~ m /test /i )
{ print " Ja , strengen 'test ' ble funnet \\ n "; }
annet
{ print " strengen ' test' ble ikke funnet \\ n "; }
å skape den " hvis " statement som sjekker for å se om strengen "test" eksisterer.
5
Type linjene
if ( $ my_string = ~ m /eksempel /i )
{ print " Ja , strengen " eksempel " var funnet \\ n "; }
annet
{ print" strengen ' eksempel ' ble ikke funnet \\ n " ;}
å lage hvis setningen som sjekker for å se om strengen "eksempel " eksisterer .
6
Lagre filen som " match.pl " .
7
Skriv kommandoen " perl match.pl " på ledeteksten til å teste skriptet.