Generally speaking, Perl treats numbers and stringified numbers as equal (ie perl -e "print 'equal' if '6.0' == 6" will print "equal"). So int will do just as good a job as sprintf.