File Coverage

blib/lib/IPC/PrettyPipe/Types.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package IPC::PrettyPipe::Types;
2              
3             # ABSTRACT: Types
4              
5 17     17   138 use strict;
  17         43  
  17         562  
6 17     17   111 use warnings;
  17         42  
  17         954  
7              
8             our $VERSION = '0.13';
9              
10             use Type::Library
11 17         142 -base,
12             -declare => qw[
13             Arg
14             AutoArrayRef
15             Cmd
16             Pipe
17 17     17   115 ];
  17         45  
18              
19 17     17   22557 use Type::Utils -all;
  17         85217  
  17         174  
20 17     17   57602 use Types::Standard -types;
  17         62  
  17         99  
21              
22 17     17   76408 use List::Util qw[ pairmap ];
  17         45  
  17         2834  
23              
24             declare AutoArrayRef, as ArrayRef;
25             coerce AutoArrayRef,
26             from Any, via { [$_] };
27              
28             class_type Pipe, { class => 'IPC::PrettyPipe' };
29             class_type Cmd, { class => 'IPC::PrettyPipe::Cmd' };
30             class_type Arg, { class => 'IPC::PrettyPipe::Arg' };
31              
32              
33             1;
34              
35             #
36             # This file is part of IPC-PrettyPipe
37             #
38             # This software is Copyright (c) 2018 by Smithsonian Astrophysical Observatory.
39             #
40             # This is free software, licensed under:
41             #
42             # The GNU General Public License, Version 3, June 2007
43             #
44              
45             __END__