my $var = 'LR20SR37PD30LR23CR23BT01H';
$var .= ' ' x 40 - length($var);