File Coverage: lib/Code/Statistics/App/Command/report.pm

# File Coverage

File: | lib/Code/Statistics/App/Command/report.pm
Coverage: | 100.0%

line | stmt | bran | cond | sub | pod | time | code
--- | --- | --- | --- | --- | --- | --- | ---
1 | 1 1 1 |  |  | 1 |  | 0 0 0 | use strict;
2 | 1 1 1 |  |  | 1 |  | 0 0 0 | use warnings;
3 |
4 |  |  |  |  |  |  | package Code::Statistics::App::Command::report;
5 |
6 |  |  |  |  |  |  | # ABSTRACT: the shell command handler for stat reporting
7 |
8 | 1 1 1 |  |  | 1 |  | 0 0 0 | use Code::Statistics::App -command;
9 |
10 |  |  |  |  |  |  | sub abstract { return 'create reports on statistics and output them' }
11 |
12 |  |  |  |  |  |  | sub opt_spec {
13 |  |  |  |  |  |  | my @opts = (
14 |  |  |  |  |  |  | [ 'quiet' => 'prevents writing of report to screen' ],
15 |  |  |  |  |  |  | [ 'file_ignore=s' => 'list of regexes matching files that should be ignored in reporting ' ],
16 |  |  |  |  |  |  | );
17 |  |  |  |  |  |  | return @opts;
18 |  |  |  |  |  |  | }
19 |
20 |  |  |  |  |  |  | sub execute {
21 |  |  |  |  |  |  | my ( $self, $opt, $arg ) = @_;
22 |
23 |  |  |  |  |  |  | return $self->cstat( %{$opt} )->report;
24 |  |  |  |  |  |  | }
25 |
26 |  |  |  |  |  |  | 1;