作者:
cutekid (可愛小孩子)
2014-03-13 11:43:23Perl 版本: 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 不到呢 ??
謝謝 ^_^