File Coverage

blib/lib/Clustericious/Admin/Dump.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 1 0.0
total 21 22 95.4


line stmt bran cond sub pod time code
1             package Clustericious::Admin::Dump;
2              
3 10     10   134176 use strict;
  10         51  
  10         350  
4 10     10   83 use warnings;
  10         30  
  10         350  
5 10     10   206 use 5.010;
  10         41  
6 10     10   603 use Data::Dumper ();
  10         5334  
  10         273  
7 10     10   73 use base qw( Exporter );
  10         26  
  10         4235  
8              
9             our @EXPORT_OK = qw( perl_dump );
10              
11             our $VERSION = '1.10'; # VERSION
12              
13             sub perl_dump ($)
14             {
15 4     4 0 332790 "#perl\n" .
16             Data::Dumper
17             ->new([$_[0]])
18             ->Terse(1)
19             ->Indent(0)
20             ->Dump;
21             }
22              
23             1;
24              
25             __END__
26              
27             =pod
28              
29             =encoding UTF-8
30              
31             =head1 NAME
32              
33             Clustericious::Admin::Dump
34              
35             =head1 VERSION
36              
37             version 1.10
38              
39             =head1 AUTHOR
40              
41             Graham Ollis <plicease@cpan.org>
42              
43             =head1 COPYRIGHT AND LICENSE
44              
45             This software is copyright (c) 2015 by Graham Ollis.
46              
47             This is free software; you can redistribute it and/or modify it under
48             the same terms as the Perl 5 programming language system itself.
49              
50             =cut