in reply to How do I specify Maximum Field Widths

One option is to use printf/sprintf, using %#.#s to specify a minimum and maximum field width: 
perl -e 'printf "%5.5s\n", 1234567890;'
12345

[download]

In Section Seekers of Perl Wisdom