数组 – 使用split(//,$str,$limit)返回尾随的空元素,矛盾的文档

However,this:
print join(':',split(//,'abc')),"n";
uses empty string matches as separators to produce the output a:b:c ; thus,the empty string may be used to split EXPR into a list of its component characters.

在我的脚本中,我需要一个前N个字符的数组或第一个长度($str) – 1个字符,取较小者.为了达到这个目的,我使用split(//,$str,$n 1)并丢弃最后一个元素.

在理论上这应该是正常的.如果LIMIT小于字符串长度,则所有额外的字符被分组到被丢弃的最后一个元素中.如果LIMIT大于字符串长度,则最后一个元素是被丢弃的最后一个字符.

这是我遇到的一个问题.

文件说：

…and each of these:
print join(':','abc',3)),"n";
print join(':',4)),"n";
produces the output a:b:c.

但这不是我得到的结果.如果LIMIT大于字符数,则结果数组始终以恰好一个空白元素(demo)结尾：

print join(':',1)),"n";    # abc
print join(':',2)),"n";    # a:bc
print join(':',"n";    # a:b:c
print join(':',"n";    # a:b:c:
print join(':',99)),"n";    # a:b:c:

这些结果与文档中的示例直接相矛盾.

文件是否出错？我的Perl版本(v5.22.2)是错的吗？
如果这种行为是无法避免的,我该如何才能完成我的原始目标？