File Coverage

blib/lib/Devel/AssertApplicationCapabilities/GNUcp.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package Devel::AssertApplicationCapabilities::GNUcp;
2              
3 1     1   5 use strict;
  1         2  
  1         34  
4 1     1   5 use vars qw($VERSION);
  1         1  
  1         57  
5             local $^W = 1;
6             $VERSION = '1.01';
7 1     1   5 use base qw(Devel::AssertApplicationCapabilities::_Base);
  1         2  
  1         476  
8              
9 1     1   515 use Devel::AssertApplicationCapabilities::GNU;
  1         3  
  1         9  
10              
11             sub app_is {
12             return 0 unless($_[0] =~ /\bcp(\.(exe|com))$/);
13             return Devel::AssertApplicationCapabilities::GNU::app_is(@_);
14             }
15              
16             =head1 NAME
17              
18             Devel::AssertApplicationCapabilities::GNUcp - check that a binary is GNU cp
19              
20             =cut
21              
22             =head1 BUGS/WARNINGS/LIMITATIONS
23              
24             This is a wrapper around Devel::AssertApplicationCapabilities::GNUcp
25             that also checks that the binary is called 'cp'. It exists solely
26             for backward compatibility reasons. The old check whether it supports
27             the -al argument is now, correctly, in ...::cpSupportsMinusal.
28              
29             =head1 SEE ALSO
30              
31             L
32              
33             =head1 SOURCE CODE REPOSITORY
34              
35             L
36              
37             =head1 AUTHOR, COPYRIGHT and LICENCE
38              
39             Copyright 2010 David Cantrell
40              
41             This software is free-as-in-speech software, and may be used,
42             distributed, and modified under the terms of either the GNU
43             General Public Licence version 2 or the Artistic Licence. It's
44             up to you which one you use. The full text of the licences can
45             be found in the files GPL2.txt and ARTISTIC.txt, respectively.
46              
47             =head1 CONSPIRACY
48              
49             This module is also free-as-in-mason software.
50              
51             =cut
52              
53             1;