my $string = 'TEST';
$string .= '0000';

##</code><code>##

$string .= '0' x ($fixed_length - length $string);