>>638
コンマ（,カンマ）で羅列すると、（スカラーコンテキストでは）左から順に評価していき、
最後（一番右）の（評価した）値を返します。

その例でいうと、左のamari3関数を評価（実行しその返り値をもらう）し、最後の（右の）0
という値を返します。

そして、その返された0と$_（amari3関数を評価（実行）された時点で$_は変更されている）
が比較（~~スマートマッチ）されます。

perlop - コンマ演算子
http://perldoc.jp/docs/perl/5.12.1/perlop.pod#Comma32Operator