Select Code to Download

my $max = 10;
my $string = 'something';
$string = substr($string, 0, $max);
my $length = length $string;
$string .= ' ' x ( $max - $length ) if ( $length < $max );