my $size    = 30;
my $field   = 'fred';
my $counter = length($field);
while ($counter < $size) {
    $field .= ' ';
    $counter++;
}