use strict;

# look ma! no $_! ;)

while (<DATA>) {
   s/\d\d(\d\d)\.(\d+)/$1$2/;
   print;
}

__DATA__
1996.40637
1996.41064
1996.41199
1996.41467
1996.41882