The Perl "m "-funktionen bruges til at matche en streng i en variabel eller fil. Dette er nyttigt, hvis du forsøger at finde en bestemt linie i en fil, f.eks som en advarsel linje i en logfil. Den kan også bruges til at kontrollere, at en bruger-indsendes værdi indeholder de korrekte oplysninger. Du kan matche en bogstavelig streng , eller du kan bruge regulære udtryk --- en måde at bruge metategn til at repræsentere et tegn eller et sæt af tegn. Instruktioner
1
Åbn en tekst dokument i enhver teksteditor.
2
Type linjen
#! /Usr /bin /perl < br . >
at starte perl script
3
Type linjerne
min $ my_string ,
$ my_string = " Dette er et eksempel string " .
print $ my_string " \\ n ";
at oprette og udskrive den variabel, der indeholder strengen " . Dette er et eksempel string "
4 < p > type linjerne
if ($ my_string = ~ m /test /i)
{ print " Ja, strengen " test " blev fundet \\ n " ;}
ellers
{ print "The string 'test ' blev ikke fundet \\ n " ;}
at skabe den "hvis" erklæring , der kontrollerer , om strengen "test" eksisterer.
5.
Indtast linjer
if ($ my_string = ~ m /eksempel /i )
{ print " Ja, strengen ' eksempel " var fundet \\ n " ;}
ellers
{ print " The snor ' eksempel ' blev ikke fundet \\ n "; ! }
at skabe den , hvis erklæring , der kontrollerer at se, om strengen " eksempel " eksisterer.
6
Gem filen som " match.pl " .
7
skriv kommandoen " perl match.pl " på kommandoprompten for at teste scriptet.