看板 Perl 關於我們 聯絡資訊
自問自答一下好了... 我原本想要的功能是:我隨機產生一段純量字串... ex:$a=aadgadgsagtagvadsgdas... 接著我想做的是指定某一個位置後,取10個。 於是我後來使用這樣的方式得到我要的(這是網路上翻到的方法,小修改一番) sub num_rand { my $length = shift;#隨輸入的長度而定 my @a = ('0'..'x');#x為$a長度-10 my $b; $num = $b[rand @a]; foreach (1..$length) { $num_2 = substr $x, $num, 10;#隨機位置n~位置n+10 } return $num_2; } my $num_2 = &num_rand(10);#得到我要的答案... 感謝,前面Keelungman跟LiloHuang幫忙,謝謝<_ _> -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.127.21.174