看板 [ Perl ]
討論串[問題] 請教perl高手,有看不懂的code
共 2 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者reizarc (零式札克)時間15年前 (2009/11/25 00:18), 編輯資訊
0
0
0
內容預覽:
那一行其實只是取得. ${ $a[ $n ] }. 這個值 順便執行 $a[ $n ] = $a[ $i ]. 這個 expr 而以. 至於它的演算法. 就是每次亂數取到一個值之後 放到取樣空間外. ( 利用縮小亂數範圍 ). --. 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 1

推噓1(1推 0噓 2→)留言3則,0人參與, 最新作者kado0413 (kado)時間15年前 (2009/11/24 13:05), 編輯資訊
0
0
0
內容預覽:
這是google找到的. 用來打亂array內的值. 不過. sub shuffle (@) {. my @a=\(@_);. my $n;. my $i=@_;. map {. $n = rand($i--);. (${$a[$n]}, $a[$n] = $a[$i])[0];. ^^^^^^^^
(還有87個字)
首頁
上一頁
1
下一頁
尾頁