Hochzählen, bei einer bestimmten Zahl stopppen und die 5-stellige Zahl generieren. - #127119 (Allgemeines zu Perl)

Dubu

2009-10-19 10:59

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

Code (perl): (dl )

my $n = 506;
for my $zahl (0 .. $n) {
    printf "%05d\n", $zahl;
}

Geht auch noch kürzer, aber (für Anfänger) vielleicht schwerer zu lesen:

Code (perl): (dl )

1
2

my $n = 506;
printf "%05d\n", $_ for 0 .. $n;

Wenn du das Ergebnis weiter verwenden möchtest, nimm sprintf() statt printf() und weise es einer Variablen zu (hier ohne das Newline "\n"):

Code (perl): (dl )

for my $zahl (0 .. $n) {
    my $zahlstr = sprintf "%05d", $zahl;
    # ... mache was mit $zahlstr
}

Edit: Typo