I hereby claim:
- I am powerman on github.
- I am powerman (https://keybase.io/powerman) on keybase.
- I have a public key ASCSBOCcVZFOBR0em9fFkAAWPJX7QbEQq69BY9wDKS_n2Qo
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
use AnyEvent::DBI::MySQL; | |
sub startup { | |
my $app = shift; | |
$app->config(db => {dsn=>…, login=>…, pass=>…}); | |
$app->helper(dbh => sub { shift->{dbh} }); | |
$app->helper(new_dbh => sub { | |
state $db = shift->app->config('db') or return; |
use AnyEvent; | |
sub allow_non_blocking_cgi { | |
my ($module) = @_; | |
eval "require $module;" or die $@; ## no critic (ProhibitStringyEval) | |
my $startup = \&{$module.'::startup'}; | |
my $wrapper = sub { | |
my ($app) = @_; | |
&{$startup}; | |
my $done = AnyEvent->condvar; |