Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 Otvorte existujúci Perl dokument alebo vytvoriť nový 
 2 
 Vytvorte regulárny výraz pre detekciu čínske znaky : . 
 
 ( \\ P { Han } + ) 
 
 detekuje jednu alebo viac čínskych znakov v dokumente proti celej čínskej znakovej sady . 
 3 
 Porovnajte linku ste uložené v Váš premenná výrazu : 
 
 if ( $ riadok = ~ m /( \\ p { Han } + ) /) { print " detekovaný čínske znaky \\ n" . ; } 
 
 porovnáva linku proti regulárneho výrazu , a ak je nájdená zhoda , zobrazí sa správa " čínske znaky zistené " sa vytlačí na obrazovku .