1 2 3 4 |
if ( grep { $_ eq $args->{mode} } qw( loop context ) ) {
my $sub = $args->{mode};
return &$sub($plugin, @_) or $ctx->error($ctx->errstr);
}
|
1 2 3 4 |
if ( grep { $_ eq $args->{mode} } qw( loop context ) ) {
my $sub = $args->{mode};
return &$sub($plugin, @_) or $ctx->error($ctx->errstr);
}
|