bitte, mach's dir doch nicht soo kompliziert...
wie lange soll $string sein? 22 zeichen? bitte schön:
$string = sprintf "%22s", $string;
wir programmieren hier schliesslich perl und nicht java =)

edit: 13 leerzeichen bekommst du übrigens mit $leerzeichen = ' ' x 13;\n\n

<!--EDIT|pq|1079535258-->