File Coverage

blib/lib/Makefile/AST/Command.pm
Criterion Covered Total %
statement 9 18 50.0
branch 0 6 0.0
condition n/a
subroutine 3 4 75.0
pod 0 1 0.0
total 12 29 41.3


line stmt bran cond sub pod time code
1             package Makefile::AST::Command;
2              
3 2     2   8 use strict;
  2         2  
  2         75  
4 2     2   11 use warnings;
  2         10  
  2         68  
5              
6 2     2   13 use base 'Class::Accessor::Fast';
  2         2  
  2         325  
7             #use Smart::Comments;
8              
9             __PACKAGE__->mk_accessors(qw{
10             silent tolerant critical content target
11             });
12              
13             sub as_str {
14 0     0 0   my $self = shift;
15 0           my $str;
16 0 0         if ($self->silent) {
17 0           $str .= '@';
18             }
19 0 0         if ($self->tolerant) {
20 0           $str .= '-';
21             }
22 0 0         if ($self->critical) {
23 0           $str .= '+';
24             }
25 0           $str .= $self->content;
26             }
27              
28             1;
29