新手求几组数字之和

大概是这样的
12345235423
43251512532
23423423423
.....
不一定多少行
我想求每行各自的和
输出如下
12345235423    34
43251512532    32
23423423423    47
.....
请各位帮帮忙刚开始学perl

作者: raging-fire 发布时间: 2011-05-31

use List::Util qw(sum);

sum split //, '1234567890';

作者: zhlong8 发布时间: 2011-05-31

Thanks

作者: raging-fire 发布时间: 2011-05-31