$ cat test.in 
12000
12678
5 
49 
50 
499
500
501
^D

$ perl -lpe '$_=int(($_+50)/100)/10;$_.=".0"unless/\./' <test.in 
12.0
12.7
0.0
0.0
0.1
0.5
0.5
0.5
[download]

PerlMonks parthenogenetically spawned by Tim Vroom.
PerlMonks was recently assimilated by The Perl Foundation.
Beefy Boxes and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.