如何将字符型的比变量变成整形变量？

choose2005

1^# choose2005 发表于 2007-11-09 22:34

@a=("1 2 3","4 5 6");
我想将每个元素的和，
即：
foreach (@a){
@b = split /\s/;
foreach (@b){
$total += $_;
}
print "total:\t $total\n";
}
结果报错：
字符串不能“＋”

Lonki

2^# Lonki 发表于 2007-11-09 22:47

试了下, 一切正常, 输出6和15

choose2005

3^# choose2005 发表于 2007-11-11 19:38

若用上
#!/usr/bin/perl -W
就会报错，不用的话就不会报错

Lonki

4^# Lonki 发表于 2007-11-11 20:04

大写W? 没用过. 一直用的小写

那这样吧

my @nums = ('1 2 3', '4 5 6');

for my $row (@nums) {
$row =~ s/\s+/+/g;
print eval $row, "\n";
}