123456789101112 package TestDatabase;use Moo;extends 'Test::Roo';around 'run_me' => sub { my $orig = shift; my $ret = $orig->(@_); return $ret;};1;
package
TestDatabase;
use
Moo;
extends
'Test::Roo'
;
around
'run_me'
=>
sub
{
my
$orig
=
shift
$ret
->(
@_
);
return
};
1;