The Perl " m " -funktionen används för att matcha en sträng i en variabel eller fil . Detta är användbart om du försöker hitta en viss rad i en fil , till exempel en varning rad i en loggfil . Den kan också användas för att kontrollera att en användare - lämnats värde innehåller rätt information. Du kan matcha en bokstavlig sträng eller du kan använda reguljära uttryck --- ett sätt att använda metatecken för att representera ett tecken eller en uppsättning tecken . Instruktioner
1
Öppna ett vanligt textdokument i valfri textredigerare .
2
Type linjen
# ! /Usr /bin /perl
att starta perl script
3
Ange linjer
min $ my_string ,
$ my_string = " det här är ett exempel string " ; .
print $ my_string " \\ n ";
att skapa och skriva ut den variabel som innehåller strängen " . Detta är ett exempel strängen "
4
Skriv linjer
if ( $ my_string = ~ m /test /i ) katalog
{print " Ja , strängen " test " hittades \\ n " ; }
annat
{print " strängen " test " hittades inte \\ n " ;}
att skapa den " om " uttalande som kontrollerar om strängen "test " existerar .
5
Skriv linjer
if ( $ my_string = ~ m /exempel /i ) katalog
{print " Ja , strängen " exempel " var hittade \\ n " ;}
annat
{print " strängen "exempel" hittades inte \\ n "; ! }
att skapa if som kontrollerar att se om strängen " exemplet " existerar .
6
Spara filen som " match.pl " .
7
Skriv kommandot " perl match.pl " på kommandotolken för att testa skriptet .
