#!perl -p
?1|9??$.=-5:1%$.