blib/lib/Mojolicious/Plugin/DebugDumperHelper.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 7 | 7 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 3 | 3 | 100.0 |
pod | 1 | 1 | 100.0 |
total | 11 | 11 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | # vim:set sw=4 ts=4 sts=4 ft=perl expandtab: | ||||||
2 | package Mojolicious::Plugin::DebugDumperHelper; | ||||||
3 | 1 | 1 | 664 | use Mojo::Base 'Mojolicious::Plugin'; | |||
1 | 2 | ||||||
1 | 5 | ||||||
4 | |||||||
5 | our $VERSION = '0.02'; | ||||||
6 | |||||||
7 | sub register { | ||||||
8 | 1 | 1 | 1 | 36 | my ($self, $app) = @_; | ||
9 | $app->helper( | ||||||
10 | debug => sub { | ||||||
11 | 1 | 1 | 629 | my ($c, @struct) = @_; | |||
12 | 1 | 4 | $c->app->log->debug("VAR DUMP\n".$c->dumper(\@struct)); | ||||
13 | } | ||||||
14 | 1 | 17 | ); | ||||
15 | } | ||||||
16 | |||||||
17 | 1; | ||||||
18 | __END__ |