#!/usr/bin/perl -w
use strict;

while (<DATA>) {
  printf('%00g', $number);
  print "\n";
}

__DATA__
1.234000
2.01 
9.00000 
8.0 
0.2340000 
0.0 
6.000001