複数行に入力した数字の合計を求めたい

問題

コピペしてきた幾つかの数字の合計を求めたい。

解決方法

Excel を使う。

…では面白くないので、折角だから Vim で。
Perl のインタフェースを使って泥臭く書いてみました。

:perl $a=0;for($i=1;$i<=$curbuf->Count();$i++){$a+=$curbuf->Get($i)};VIM::Msg($a);

vimrc に Sum というコマンドで登録しておきました。

command! Sum perl $a=0;for($i=1;$i<=$curbuf->Count();$i++){$a+=$curbuf->Get($i)};VIM::Msg($a);

バッファが以下の状態で Sum を実行すると、

1
2
3
4
5

15 と表示されます。