L_WC 发表于 2020-04-23 11:03

大神请进,perl 匹配全角日文

本帖最后由 L_WC 于 2020-04-23 13:28 编辑



my $input = <STDIN>;

chomp $input;

print "反映処理結果:\n";

if ($input =~ m/[^\w-\d\s]+/)
{
      print "OK";
}





各位大神,这个全角日文怎么写. 多谢了.

同时要保证, print "反映処理結果:\n";不会出现wide char 警告.

legs 发表于 2020-04-26 07:57

如果不区分中文、日文等，可以匹配非ASCII
[^\x00-\xFF]
页: [1]
查看完整版本: 大神请进,perl 匹配全角日文