The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

  $0 -p rate -n size -g rows,cols

  ベルヌーイ分布もしくは二項分布(binomial distribution)に従う乱数の生成。

 オプション: 
   -b N : 二項分布の試行回数(整数)。未指定なら1(ベルヌーイ分布に従う乱数が生成される)。
   -g N1,N2 : N1行N2列の行列の形で出力。横方向はタブ文字区切り。,の代わりにxの文字でも良い。
   -p N : 二項分布の成功確率(0以上1以下の数)。未指定なら0.5。 
   -s N : 乱数シードの設定。再現性を確保するため。Nの2^32(=約4.3億)による剰余がシードとなる。
   -1   : 2次情報の抑制。通常シード情報などは標準エラー出力で色つきで出力されるがそれを抑制する。

  --help : この $0 のヘルプメッセージを出す。  perldoc -t $0 | cat でもほぼ同じ。
  --help opt : オプションのみのヘルプを出す。opt以外でも options と先頭が1文字以上一致すれば良い。
  --version : バージョン情報の表示。
 
  開発メモ :
      * -g で Infも指定可能としたい。poissonコマンドを参照。ただし、速度比較をせよ。
 =cut