求助 -perl 数组定义

求助 -perl 数组定义

我现在有一个字符串 my $str = "1,2,3..8,9"; 我想吧它放到数组里,效果就是(1,2,3,4,5,6,7,8,9)
也就是吧,分割的字符放到数组的每个元素,其中3..8 应分为3,4,5,6,7,8.
使用split函数...
使用split的话3..8不能拆分为相应的元素啊。。
my $str = "1,2,3..8,9";
my @nums = eval '(' . $str . ')';
print join(", ",@nums),"\n";
恩 谢谢。。