File Coverage

lib/Code/Statistics/App/Command/report.pm
Criterion Covered Total %
statement 14 15 93.3
branch n/a
condition n/a
subroutine 5 6 83.3
pod 3 3 100.0
total 22 24 91.6


line stmt bran cond sub pod time code
1 1     1   573 use strict;
  1         3  
  1         34  
2 1     1   6 use warnings;
  1         2  
  1         61  
3              
4             package Code::Statistics::App::Command::report;
5             {
6             $Code::Statistics::App::Command::report::VERSION = '1.112980';
7             }
8              
9             # ABSTRACT: the shell command handler for stat reporting
10              
11 1     1   6 use Code::Statistics::App -command;
  1         2  
  1         8  
12              
13 0     0 1 0 sub abstract { return 'create reports on statistics and output them' }
14              
15             sub opt_spec {
16 1     1 1 1396 my @opts = (
17             [ 'quiet' => 'prevents writing of report to screen' ],
18             [ 'file_ignore=s' => 'list of regexes matching files that should be ignored in reporting ' ],
19             );
20 1         12 return @opts;
21             }
22              
23             sub execute {
24 1     1 1 826 my ( $self, $opt, $arg ) = @_;
25              
26 1         3 return $self->cstat( %{$opt} )->report;
  1         22  
27             }
28              
29             1;
30              
31             __END__
32             =pod
33              
34             =head1 NAME
35              
36             Code::Statistics::App::Command::report - the shell command handler for stat reporting
37              
38             =head1 VERSION
39              
40             version 1.112980
41              
42             =head1 AUTHOR
43              
44             Christian Walde <mithaldu@yahoo.de>
45              
46             =head1 COPYRIGHT AND LICENSE
47              
48             This software is Copyright (c) 2010 by Christian Walde.
49              
50             This is free software, licensed under:
51              
52             DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE, Version 2, December 2004
53              
54             =cut
55