Hallo bianca,

eine weitere Möglichkeit wäre sprintf("%-12d",$string) =~ s/ /0/gr

Vermutlich ist das auch nicht weniger rechenintensiv; eher mehr als Dein Ansatz.

HTH
Grüße
payx