我有一个字符串,我需要分成三个字符的块。谷歌搜索发现以下代码,它工作正常:此Perl代码如何将字符串拆分为三个字符的块?
$input = "DEADBEEF";
@output =();
my @output = ($input =~ m/.{3}/g);
print $_."\n" foreach (@output);
我是一个Perl初学者;有人可以向我解释$input =~ m/.{3}/g
的表达是什么吗?
我有一个字符串,我需要分成三个字符的块。谷歌搜索发现以下代码,它工作正常:此Perl代码如何将字符串拆分为三个字符的块?
$input = "DEADBEEF";
@output =();
my @output = ($input =~ m/.{3}/g);
print $_."\n" foreach (@output);
我是一个Perl初学者;有人可以向我解释$input =~ m/.{3}/g
的表达是什么吗?
$input - scalar variable
=~ - apply regular expression
m - Match (in list context so return a list of matched substrings)
/ - start of expression
. - any character
{3} - 3 times
/ - end of expression
g - globally
谢谢。我之前有点困惑。现在正则表达式的解释很清楚。 –
@Quentin be-a-u-ti-ful,bravo! – gaussblurinc
ALWAYS'使用strict'和'使用warnings' – Toto
见http://stackoverflow.com/q/372370/133939更好的方法来做到这一点。 – Zaid