File Coverage

blib/lib/Acme/CPANModules/RsyncWrappers.pm
Criterion Covered Total %
statement 6 6 100.0
branch 3 4 75.0
condition n/a
subroutine 2 2 100.0
pod n/a
total 11 12 91.6


line stmt bran cond sub pod time code
1             package Acme::CPANModules::RsyncWrappers;
2              
3 1     1   294300 use strict;
  1         1  
  1         232  
4              
5             our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
6             our $DATE = '2023-10-31'; # DATE
7             our $DIST = 'Acme-CPANModules-RsyncWrappers'; # DIST
8             our $VERSION = '0.002'; # VERSION
9              
10             require Acme::CPANModules::CLI::Wrapper::UnixCommand;
11             my $srclist = $Acme::CPANModules::CLI::Wrapper::UnixCommand::LIST;
12              
13             sub _include {
14 13     13   18 my ($list, $item) = @_;
15 13 50       23 ref $list eq 'ARRAY' ? ((grep {$_ eq $item} @$list) ? 1:0) : ($list eq $item);
  5 100       10  
16             }
17              
18             our $LIST = {
19             summary => "List of wrappers for the rsync command",
20             entries => [
21             grep { _include($_->{'x.command'}, 'rsync') } @{ $srclist->{entries} }
22             ],
23             };
24              
25             1;
26             # ABSTRACT: List of wrappers for the rsync command
27              
28             __END__