Perlの処理で質問です．
以下のようなdatファイルを読み込み，
右側の数値が同じ場合，左側の数値をすべて足して（グループ化して）
出力する，といった処理がしたいのですが，
どのようにすればいいのでしょうか？

--1st_out.dat--
7 12
10 12
12 12
10 12
9 12
9 12
6 12
6 12
11 13
9 13
12 13
11 13
10 14
10 14
15 14
12 14
7 14

希望する出力結果

69 12
43 13
54 14