File Coverage

lib/DataFlow/Policy/ScalarOnly.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             package DataFlow::Policy::ScalarOnly;
2              
3 1     1   2126 use strict;
  1         4  
  1         43  
4 1     1   6 use warnings;
  1         4  
  1         54  
5              
6             # ABSTRACT: A ProcPolicy that treats all items as scalars
7              
8             our $VERSION = '1.121830'; # VERSION
9              
10 1     1   20169 use Moose;
  0            
  0            
11             with 'DataFlow::Role::ProcPolicy';
12              
13             use namespace::autoclean;
14              
15             sub _build_default_handler {
16             return \&_handle_svalue;
17             }
18              
19             __PACKAGE__->meta->make_immutable;
20              
21             1;
22              
23              
24              
25             =pod
26              
27             =encoding utf-8
28              
29             =head1 NAME
30              
31             DataFlow::Policy::ScalarOnly - A ProcPolicy that treats all items as scalars
32              
33             =head1 VERSION
34              
35             version 1.121830
36              
37             =head1 SEE ALSO
38              
39             Please see those modules/websites for more information related to this module.
40              
41             =over 4
42              
43             =item *
44              
45             L<DataFlow|DataFlow>
46              
47             =back
48              
49             =head1 AUTHOR
50              
51             Alexei Znamensky <russoz@cpan.org>
52              
53             =head1 COPYRIGHT AND LICENSE
54              
55             This software is copyright (c) 2011 by Alexei Znamensky.
56              
57             This is free software; you can redistribute it and/or modify it under
58             the same terms as the Perl 5 programming language system itself.
59              
60             =head1 BUGS AND LIMITATIONS
61              
62             You can make new bug reports, and view existing ones, through the
63             web interface at L<http://rt.cpan.org>.
64              
65             =head1 DISCLAIMER OF WARRANTY
66              
67             BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
68             FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT
69             WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER
70             PARTIES PROVIDE THE SOFTWARE "AS IS" WITHOUT WARRANTY OF ANY KIND,
71             EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE
72             IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
73             PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE
74             SOFTWARE IS WITH YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME
75             THE COST OF ALL NECESSARY SERVICING, REPAIR, OR CORRECTION.
76              
77             IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
78             WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
79             REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENCE, BE LIABLE
80             TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL, OR
81             CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE
82             SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING
83             RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A
84             FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF
85             SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
86             DAMAGES.
87              
88             =cut
89              
90              
91             __END__
92