Since you're reading in from STDIN, you might need to use chomp on the last element of your array.

I haven't tested it, but you might be able to modify your foreach loop to something like below, which uses chomp on each element.

foreach (@userin) {
    chomp;
    printf "%20s", $_ ;
}
[download]