CGI::ExceptionManager - DebugScreen with detach!
use CGI::ExceptionManager; CGI::ExceptionManager->run( callback => sub { redirect("http://wassr.jp/"); # do not reach here }, powered_by => 'MENTA', ); sub redirect { my $location = shift; print "Status: 302\n"; print "Location: $location\n"; print "\n"; CGI::ExceptionManager::detach(); }
You can easy to implement DebugScreen and Detach architecture =)
detach from current context.
CGI::ExceptionManager->run( callback => \&code, powered_by => 'MENTA', );
run the new context.
You can specify your own renderer like following code:
CGI::ExceptionManager->run( callback => \&code, powered_by => 'MENTA', renderer => sub { }, );
Tokuhiro Matsuno <tokuhirom@gmail.com>
Kazuho Oku
Sledge::Plugin::DebugScreen, http://kazuho.31tools.com/nanoa/nanoa.cgi, http://gp.ath.cx/menta/
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install CGI::ExceptionManager, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CGI::ExceptionManager
CPAN shell
perl -MCPAN -e shell install CGI::ExceptionManager
For more information on module installation, please visit the detailed CPAN module installation guide.