Opened by Compined at 2011-10-11 00:18
User since
2006-05-04
564 Artikel
BenutzerIn
2006-05-04
564 Artikel
BenutzerIn
Hallo Compined,
die Lösung von pq ist natürlich prima, nur der Vollständigkeit halber hier noch die Möglichkeit, das Modul
List::Util zu verwenden:
HTH
Grüße
payx
die Lösung von pq ist natürlich prima, nur der Vollständigkeit halber hier noch die Möglichkeit, das Modul
List::Util zu verwenden:Code (perl): (dl
)
1 2 3 4 5 6 7
use List::Util qw(shuffle); my @a = (1,2,3,4,5,6); my @b = shuffle(@a); print $b[0];
HTH
Grüße
payx