in reply to Is There A Better Way?

Thanks all. The sprintf function did it.

In Section Seekers of Perl Wisdom