The Perl Grep Funktionen evaluerer hvert element i en matrix eller liste, og returnerer de elementer , der matcher søgestrengen . Det svarer til Linux og Unix " grep " kommando . Ligesom " grep " kommando , kan du bruge regulære udtryk til søgestrengen. Regulære udtryk bruge symboler , kaldet metategn , til at matche mønstre i en streng . Perl grep -funktionen er ikke begrænset til at bruge regulære udtryk. Du kan bruge nøjagtige strenge i udtrykket del af funktionen . Instruktioner
1
Åbn en tom almindelig tekst dokument i enhver teksteditor
2
Type linjen
# /usr /bin /perl . ! - w
at starte Perl script
3
Type linjen
min @ værdier = qw ( Abby Joseph James Joshua Alicia Astor ) . < br >
at skabe en række værdier
4
Type linjen
mine @ Suba = grep ( /^ a /, @ værdier ) .
< p> for at søge efter alle de navne, der starter med bogstavet "a".
5.
Type linjen
mine @ Subb = grep ( /^ j /, @ værdier ) .
for at søge efter alle de navne, der starter med bogstavet "J"
6
Type linjen
print " @ Suba \\ n" ;
at udskrive " Abby Alicia Astor " til skærmen
7
Type linjen
print " @ Subb \\ n"; .
< p > for at udskrive " Joseph James Joshua " på skærmen.
8
Gem og luk filen.