为什么拆分不返回任何东西？

Question

我试图让Perl split工作超过2个小时.我没有看到错误.也许其他一些眼睛可以看看它并看到问题.我确信这是一个愚蠢的:

@versionsplit=split('.',"15.0.3");

print $versionsplit[0];
print $versionsplit[1];
print $versionsplit[2];

我只是得到一个空数组.知道为什么吗？

Answer 1

你需要:

@versionsplit=split(/\./,"15.0.3");

第一个参数split是正则表达式,而不是字符串.并且.是正则表达式符号,意思是"匹配任何角色".因此,输入字符串中的所有字符都被视为分隔符,并且split在它们之间没有找到任何要返回的字符.