用perl 写个加法程序 （acm.zju.edu.cn 1001题）

qq64878641

浙大 ACM 的 1001 。
输入
1 2
输出
3


用perl怎么解决这题？
http://acm.zju.edu.cn/onlinejudge/showProblem.do?problemCode=1001

zhlong8

这英文读着怎么这么纠结……

qq64878641

需要帮你 翻译下吗？

zhlong8

perl -naE "say $F[0]+$F[1]" file

hitsubunnu

1. 
   
2. perl -e "print eval join '+',@ARGV" 1 2
   

复制代码

zhlong8

看了下别的程序的代码都是从 stdin 读的，那把 file 改成 - 就可以了

hp_truth

perl5 -e 'print $ARGV[0] + $ARGV[1], "\n"' 12 -5

perl -e 'while (<>) {($a, $b) = split; print $a+$b,"\n" }'

qq64878641

问题解决了 ！

flw

hitsubunnu 发表于 2011-04-18 11:38

   

hitsubunnu

回复 9# flw

酒量不行就少喝点儿 省得乱吐