zufallsnamengenerator: rätsel der stunde - #66974 (Allgemeines zu Perl)

Linuxer

2006-06-06 15:45

User since
2006-01-27
3891 Artikel
HausmeisterIn

user image

Jo, ist auch trivial und springt sofort ins Auge ... :ghostface:

Besser finde ich es zu erklären, wenn man sich die Mühe macht und schreibt den Code um als klassische Schleife mit passender Klammerung; dann wird es wirklich klar, was passiert.

Nach nun drei Tagen bin ich so frei, das eben geschriebene umzusetzen und meine Lösung hier nun anzugeben:

Code (perl): (dl )

1
2

$name .= chr 65 + int rand 26 for 1..3 + int rand 3;
print $name;

wird zu

Code (perl): (dl )

for ( 1 .. 3 + int rand 3 ) {
  $name .= chr 65 + int rand 26;
}
print $name;

und

Code (perl): (dl )

print $name .= chr 65 + int rand 26 for 1..3 + int rand 3;

wird zu

Code (perl): (dl )

1
2
3

for ( 1 .. 3 + int rand 3 ) {
  print $name .= chr 65 + int rand 26;
}

\n\n

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!