- Perlについての質問箱 64箱目 [転載禁止]©2ch.net
174 ：デフォルトの名無しさん[sage]：2015/04/09(木) 12:39:17.03 ID:f/5UDar+ - >>169
手元のマシンもcodepad.orgもこうだけど
http://codepad.org/0nMtoGOe
#!/usr/bin/perl
for($n=0; $n<10; $n++)
{
srand($n);
my ($r) = (rand(10));
print "value = $r\n";
}
value = 1.7082803610629
value = 0.416303447718782
value = 9.12432653437467
value = 7.83234962103055
value = 6.54037270768644
value = 5.24839579434232
value = 3.95641888099821
value = 2.66444196765409
value = 1.37246505430998
value = 0.080488140965862
|
|