Perlコーディング初心者質問スレ Part 55

[0327 nobodyさん 2007/07/03(火) 14:22:12 ID:???]

my $a = rand 1;

$a>=0 and $a<1;