get;$_=words;put [$!+=grep(.sum/+^-$_-*==2,@$_),$_-$!]