File Coverage

blib/lib/Alien/m4.pm
Criterion Covered Total %
statement 11 14 78.5
branch 1 2 50.0
condition n/a
subroutine 4 6 66.6
pod 2 2 100.0
total 18 24 75.0


line stmt bran cond sub pod time code
1             package Alien::m4;
2              
3 3     3   333734 use strict;
  3         13  
  3         81  
4 3     3   13 use warnings;
  3         5  
  3         79  
5 3     3   14 use base qw( Alien::Base );
  3         5  
  3         1571  
6              
7             # ABSTRACT: Find or build GNU m4
8             our $VERSION = '0.20'; # VERSION
9              
10              
11             sub alien_helper
12             {
13 0     0 1 0 my($class) = @_;
14             return {
15 0     0   0 m4 => sub { $class->exe },
16 0         0 };
17             }
18              
19             sub exe
20             {
21 2     2 1 283120 my($class) = @_;
22 2 50       16 $class->runtime_prop->{command} || 'm4';
23             }
24              
25             1;
26              
27             __END__