File Coverage

blib/lib/Command/Template.pm
Criterion Covered Total %
statement 31 31 100.0
branch n/a
condition n/a
subroutine 10 10 100.0
pod 2 2 100.0
total 43 43 100.0


line stmt bran cond sub pod time code
1             package Command::Template;
2              
3             # vim: ts=3 sts=3 sw=3 et ai :
4              
5 3     3   155539 use 5.024000;
  3         31  
6 3     3   16 use warnings;
  3         5  
  3         90  
7 3     3   1629 use experimental qw< signatures >;
  3         10891  
  3         16  
8 3     3   571 no warnings qw< experimental::signatures >;
  3         6  
  3         212  
9             { our $VERSION = '0.001' }
10              
11 3     3   20 use Exporter 'import';
  3         6  
  3         198  
12             our @EXPORT_OK = qw< command_runner command_template cr ct >;
13              
14 3     3   1410 use Command::Template::Instance;
  3         7  
  3         104  
15 3     3   1432 use Command::Template::Runner;
  3         12  
  3         331  
16              
17 1     1 1 300 sub cr (@cmd) { Command::Template::Runner->new(ct(@cmd)) }
  1         4  
  1         2  
  1         5  
18 2     2 1 1749 sub ct (@cmd) { Command::Template::Instance->new(@cmd) }
  2         8  
  2         4  
  2         19  
19              
20             {
21 3     3   25 no strict 'refs';
  3         7  
  3         239  
22             *command_runner = *cr;
23             *command_template = *ct;
24             }
25              
26             1;