CGI::AppでのDebugScreen このエントリーは最初の投稿時と大きく書き換えました。 nekokakさんがつくられた「CGI::AppでのDebugScreen」はかなりハゲシクGJです。 ただ、prerunに引っ掛けるとその他のPluginで動かなくなるのがありそうなので、error_modeを使うinitにHookしてSIG{__DIE__}を差し込むというのはいかがですか? importとdebug_reportを書き換えた。 sub import { my $caller = caller; $caller->add_callback( 'init', sub{ my $self = shift; $caller::SIG{__DIE__} = sub{ $self->debug_report(@_); die @_; }; }); no strict 'refs';