Perlito5 - perl5 - pretty-printer - number, apply (fix)