File Coverage

blib/lib/App/Commando.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 17 17 100.0


line stmt bran cond sub pod time code
1             package App::Commando;
2              
3 1     1   25453 use strict;
  1         3  
  1         43  
4 1     1   7 use warnings;
  1         3  
  1         47  
5              
6             # ABSTRACT: Flexible library to build command-line apps
7              
8             our $VERSION = '0.012'; # VERSION
9              
10 1     1   572 use App::Commando::Program;
  1         4  
  1         87  
11              
12             sub program {
13 8     8 1 14988 my ($name) = @_;
14              
15 8         192 my $program = App::Commando::Program->new($name);
16              
17 8         239 return $program;
18             }
19              
20             1;
21              
22             __END__