perldb補足

.perldb

# エイリアス設定したり
$DB::alias{'rerun'} = 'exec "perl -d $DB::filename"';
$DB::alias{'len'}   = 's/^len(.*)/p length($1)/';
$DB::alias{'stop'}  = 's/^stop (at|in)/b/';

# トレース情報をdb.outに保存
parse_options("LineInfo=db.out AutoTrace");

# デバッガの初期化終了後に呼び出されるサブルーチン
sub afterinit {

  ### 外部からブレークポイントをコントロール
    # サブルーチンに対してブレークポイント設定とか（モジュールがロードされている必要あり）
    push @DB::typeahead, "b MyModue::Hoge::new";
    # 特定のモジュールがロードされたらブレークするとか
    push @DB::typeahead, "b load MyModule::Fuga";

}