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 14     14   103 use strict;
  14         43  
  14         459  
6 14     14   80 use warnings;
  14         30  
  14         832  
7              
8             our $VERSION = '0.11'; # TRIAL
9              
10             use Type::Library
11 14         127 -base,
12             -declare => qw[
13             Arg
14             AutoArrayRef
15             Cmd
16             Pipe
17 14     14   91 ];
  14         31  
18              
19 14     14   18440 use Type::Utils -all;
  14         67402  
  14         156  
20 14     14   47177 use Types::Standard -types;
  14         35  
  14         82  
21              
22 14     14   62492 use List::Util qw[ pairmap ];
  14         39  
  14         2458  
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__