$|=(print~-$`%($k=$'+1)+$k*$_,$/),<>+0for<>!~$"..4