blessではまった
またしょーも無いことで結構時間を食ってしまった。
こんな風にblessした。
bless { opt1 => $args->{hoge} || die "missing hoge", opt2 => 'foo', }, $class;
そしたらopt2取れないの。考えること30分あまり。
これで解決。
bless { opt1 => $args->{hoge} || die("missing hoge"), opt2 => 'foo', }, $class;
dieに引数奪われてた。
そりゃそうだわな。バカだ。