$str = 'abcde';
$str .= "\0" x (24 - length $str);
print length $str;
print "\n";