続きは・・・
関数：乱数を生成する
rand関数を使って、乱数を発生することができます。
rand(整数値)
rand関数は、0以上引数未満の有理数を返します。
プログラムの例では、1から6までの整数値を乱数で返す例です。さいころを振ったときのシミュレーションができている例です。ちなみにint関数で引数の値を丸めています。
プログラム 例1
#!/usr/bin/perl
print "サイコロを振ります。" . "\n";
print "何かキーを押してください。"; <STDIN>;
$random = int( rand(6) ) + 1;
print "サイコロの目は、" . $random . "です。\n";
例1の実行結果
[it-engineer@home1 perl]# perl 20070520-5.pl
サイコロを振ります。
何かキーを押してください。
サイコロの目は、4です。
[it-engineer@home1 perl]#
