Finne kinesiske tegn ved hjelp av regulære uttrykk i Perl kan være komplisert . Regulære uttrykk er en effektiv måte å parsing tekst fra filer . Du kan bruke vanlige uttrykk med alle språk , så lenge du bruker den riktig syntaks . Bruk uttrykket til å returnere en melding om kinesiske tegn er funnet i en blokk med tekst . Instruksjoner
en
Åpne et eksisterende Perl dokument eller opprette en ny
2
Lag et regulært uttrykk for å oppdage kinesiske tegn : .
( \\ P { Han } + )
p Dette vil oppdage en eller flere kinesiske tegn i et dokument mot hele den kinesiske tegnsettet.
3
sammenligne den linjen du har lagret i variabelen til uttrykket : en
if ( $ linje = ~ m /( \\ p { Han } + ) /) { print " kinesiske tegn oppdaget \\ n . "; }
sammenligner linjen mot det vanlige uttrykket , og hvis en kamp blir funnet , vises meldingen " kinesiske tegn oppdaget " vil skrive ut på skjermen.