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

  $0

    入力の各行を順次指定された確率で出力する。

 オプション : 
    -c N : 単にN行ごとに周期的に出力する。開始行は1行目からN御目のランダム。(Cyclic only)
    -e N :各行について、非復元抽出の場合は抽出確率、復元抽出の場合は抽出回数の期待値を指定する。Default 0.5 (Expectation value of appearance number of each line.)
    -e N1/N2 : The appearance expectation number can be specified by fraction.
    -r ; 復元抽出であることをしている。この場合、各行が2回以上抽出されることがある。(With Replacement)
    -s N[!] ; ランダムシードの指定。! を付加すると、0以上指定した数未満の数がランダムにシードとなる。(Random Seed)


    -: ; 行番号を表示する。
    -= ; 1行目をヘッダと見なして表示する。