我有一个包含值的数组.我需要从每个数组元素中减去1并且保存在那里.
例如：
chop $tve_005; @words = split (/,/,$tve_005);
现在@words包含：
524210 1713409 311919 1422134 16658312
但是在其余代码中需要使用的实际值是:(总是减去1)
524209 1713408 311918 1422133 16658311
如何减去并保存相同的数组.
解决方法
试试这个
#!/usr/bin/perl
my @words = (524210,1713409,311919,1422134,16658312);
@words = map { $_ - 1 } @words;