$reversed = reverse $number;

##</code><code>##

perl -pe '$_ = $_%9 . "\n"'