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   507960 use strict;
  2         10  
  2         58  
4 2     2   9 use warnings;
  2         5  
  2         56  
5 2     2   13 use base qw( Alien::Base );
  2         3  
  2         1131  
6 2     2   50174 use Env qw( @PATH );
  2         2624  
  2         13  
7              
8             # ABSTRACT: Find or build patch
9             our $VERSION = '0.15'; # 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   169943 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             __END__