这个 Perl 代码如何将字符串拆分为三个字符的块？答案

【问题标题】：How does this Perl code split a string into three-character chunks?这个 Perl 代码如何将字符串拆分为三个字符的块？
【发布时间】：2012-09-05 19:39:36
【问题描述】：

我有一个字符串需要分成三个字符的块。谷歌搜索发现以下代码，运行良好：

$input = "DEADBEEF";
@output = ();
my @output = ( $input =~ m/.{3}/g );
print $_."\n" foreach (@output);

我是 Perl 初学者；有人可以向我解释一下$input =~ m/.{3}/g 的表达方式吗？

【问题讨论】：

总是use strict 和use warnings
请参阅 stackoverflow.com/q/372370/133939 了解更好的方法。

标签： regex perl split

【解决方案1】：

$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，太棒了！