File Coverage

blib/lib/Alien/patch.pm
Criterion Covered Total %
statement 13 16 81.2
branch 0 2 0.0
condition n/a
subroutine 5 8 62.5
pod 2 2 100.0
total 20 28 71.4


line stmt bran cond sub pod time code
1             package Alien::patch;
2              
3 2     2   380839 use strict;
  2         8  
  2         45  
4 2     2   8 use warnings;
  2         2  
  2         43  
5 2     2   7 use base qw( Alien::Base );
  2         3  
  2         772  
6 2     2   38100 use Env qw( @PATH );
  2         2110  
  2         8  
7              
8             # ABSTRACT: Find or build patch
9             our $VERSION = '0.14'; # VERSION
10              
11              
12             sub exe
13             {
14 0 0   0 1 0 $^O eq 'MSWin32' ? 'patch --binary' : 'patch';
15             }
16              
17             sub _vendor
18             {
19 1     1   128771 shift->runtime_prop->{my_vendor};
20             }
21              
22              
23             sub alien_helper
24             {
25             return {
26             patch => sub {
27 0     0     Alien::patch->exe;
28             },
29             }
30 0     0 1   }
31              
32             1;
33              
34             __END__