"0" links Anhängen

[Reinhard Doberstein]

HAllo,

ich will an einer Zahl links "0" anhängen bis sie wenigstens 3 Stellen hat. Wie mach ich das am einfachsten?
Also
 "7"    -> "007"
 "17"   -> "017"
 "117"  -> "117"
 "3117" -> "3117"
Prinzip klar?

Ich könnte das wie folgt machen:
  if ( $laufnummer =~ m/\A.\Z/ ) { $laufnummer = "0" . $laufnummer };
  if ( $laufnummer =~ m/\A..\Z/ ) { $laufnummer = "0" . $laufnummer };
Aber das geht doch bestimmt 'schöner'.

Ach ja, es ist wirklich eine Zahl. D.h. man könnte auch mit "if ( $laufnummer < 10 ) ..." arbeiten. Aber vielleicht geht es auch allgemein für Zeichenketten.

By
Reinhard