此Perl代碼如何將字符串拆分爲三個字符的塊？

Question

我有一個字符串，我需要分成三個字符的塊。谷歌搜索發現以下代碼，它工作正常：

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

我是一個Perl初學者;有人可以向我解釋$input =~ m/.{3}/g的表達是什麼嗎？

Answer 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