Perl 版本: ActivePerl 5.16.3
程式如下:
#!/usr/bin/perl -w
use utf8;
$s = '#印#';
use bytes;
############
# match 不到
($match) = $s =~ /([\x80-\xff]*)/;
print "match:[$match]\n";
############
# match 的到
($match) = $s =~ /([\x80-\xff]+)/;
print "match:[$match]\n";
问题:
为什么我用 * 时会 match 不到呢 ??
谢谢 ^_^