File Coverage

blib/lib/Pcore/Core/Dump.pm
Criterion Covered Total %
statement 6 8 75.0
branch n/a
condition n/a
subroutine 2 3 66.6
pod 0 1 0.0
total 8 12 66.6


line stmt bran cond sub pod time code
1             package Pcore::Core::Dump;
2              
3 5         56 use Pcore -export => {
4             CORE => [qw[dump]],
5             DEFAULT => [qw[dump]],
6 5     5   29 };
  5         7  
7 5     5   1942 use Pcore::Core::Dump::Dumper;
  5         14  
  5         1038  
8              
9             sub dump { ## no critic qw[Subroutines::ProhibitBuiltinHomonyms]
10 0     0 0   my %args = (
11             color => 1,
12             tags => 1,
13             indent => 4,
14             @_[ 1 .. $#_ ],
15             );
16              
17 0           return '$VAR = ' . bless( \%args, 'Pcore::Core::Dump::Dumper' )->run( $_[0] );
18             }
19              
20             1;
21             ## -----SOURCE FILTER LOG BEGIN-----
22             ##
23             ## PerlCritic profile "pcore-script" policy violations:
24             ## +------+----------------------+----------------------------------------------------------------------------------------------------------------+
25             ## | Sev. | Lines | Policy |
26             ## |======+======================+================================================================================================================|
27             ## | 1 | 17 | ValuesAndExpressions::RequireInterpolationOfMetachars - String *may* require interpolation |
28             ## +------+----------------------+----------------------------------------------------------------------------------------------------------------+
29             ##
30             ## -----SOURCE FILTER LOG END-----
31             __END__
32             =pod
33              
34             =encoding utf8
35              
36             =head1 NAME
37              
38             Pcore::Core::Dump
39              
40             =head1 SYNOPSIS
41              
42             =head1 DESCRIPTION
43              
44             =cut