use 5.010; use strict; use warnings; use Inline::Files; while (my $line = <FILE>) { chomp $line; say $line if ($line !~ /^\w/); } __FILE__ hello world Ì«Ñô ÔÂÁÁI I am an boy
In reply to Re: Regular expression for chinese character
by ssqq
in thread Regular expression for chinese character
by senthilkumarperl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |