Thread Alle Zahlen von 1-25 per Random ziehen (12 answers)
Opened by Robby at 2003-10-08 12:49

Dubu
 2003-10-08 17:55
#61763 #61763
User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image
Code (perl): (dl )
1
2
3
use List::Util qw/shuffle/;

print join " ", shuffle(0 .. 24), "\n" for 0 .. 9;


Mit Perl 5.8.0 (ohne Ausgabe):
           Rate esskar   dubu
esskar   7714/s     --   -86%
shuffle 54305/s   604%     --

View full thread Alle Zahlen von 1-25 per Random ziehen