in reply to floating points and sprintf
This may not make your co-worker happy, but:
  p
$ perl -we'printf"%d, %.0f\n",$a=147.2*100,$a' 14719, 14720
  p
In Section
Seekers of Perl Wisdom