printf +(3 < length $in ? q() : ' ') . '%-3s', $in