ワイブル分布のパラメータ推定（Perl テスト用）