File Coverage

blib/lib/Acme/BLACKJ/Utils.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 17 17 100.0


line stmt bran cond sub pod time code
1             package Acme::BLACKJ::Utils;
2              
3 2     2   49818 use 5.006;
  2         9  
  2         136  
4 2     2   18 use strict;
  2         4  
  2         93  
5 2     2   19 use warnings FATAL => 'all';
  2         9  
  2         273  
6              
7             =head1 NAME
8              
9             Acme::BLACKJ::Utils - The great new Acme::BLACKJ::Utils!
10              
11             =head1 VERSION
12              
13             Version 0.01
14              
15             =cut
16              
17             our $VERSION = '0.01';
18              
19             =head1 SYNOPSIS
20              
21             This module is my first CPAN distribution. It is a product of the
22             Intermediate Perl exercises from Chapters 12 and 21 of that book.
23             The sum() function sums two values and returns the product to the
24             caller.
25              
26             Perhaps a little code snippet.
27              
28             use Acme::BLACKJ::Utils;
29              
30             my $foo = Acme::BLACKJ::Utils::sum(1,10);
31             print "$foo\n"; # 11
32             ...
33              
34             =head1 SUBROUTINES/METHODS
35              
36             =head2 sum
37              
38             =cut
39              
40             sub sum {
41 8     8 1 951 my $a = shift;
42 8         11 my $b = shift;
43 8         83 return $a + $b;
44             }
45              
46              
47             =head1 AUTHOR
48              
49             Jeff Black, C<< >>
50              
51             =head1 BUGS
52              
53             Please report any bugs or feature requests to C, or through
54             the web interface at L. I will be notified, and then you'll
55             automatically be notified of progress on your bug as I make changes.
56              
57              
58              
59              
60             =head1 SUPPORT
61              
62             You can find documentation for this module with the perldoc command.
63              
64             perldoc Acme::BLACKJ::Utils
65              
66              
67             You can also look for information at:
68              
69             =over 4
70              
71             =item * RT: CPAN's request tracker (report bugs here)
72              
73             L
74              
75             =item * AnnoCPAN: Annotated CPAN documentation
76              
77             L
78              
79             =item * CPAN Ratings
80              
81             L
82              
83             =item * Search CPAN
84              
85             L
86              
87             =back
88              
89              
90             =head1 ACKNOWLEDGEMENTS
91              
92              
93             =head1 LICENSE AND COPYRIGHT
94              
95             Copyright 2013 Jeff Black.
96              
97             This program is free software; you can redistribute it and/or modify it
98             under the terms of the the Artistic License (2.0). You may obtain a
99             copy of the full license at:
100              
101             L
102              
103             Any use, modification, and distribution of the Standard or Modified
104             Versions is governed by this Artistic License. By using, modifying or
105             distributing the Package, you accept this license. Do not use, modify,
106             or distribute the Package, if you do not accept this license.
107              
108             If your Modified Version has been derived from a Modified Version made
109             by someone other than you, you are nevertheless required to ensure that
110             your Modified Version complies with the requirements of this license.
111              
112             This license does not grant you the right to use any trademark, service
113             mark, tradename, or logo of the Copyright Holder.
114              
115             This license includes the non-exclusive, worldwide, free-of-charge
116             patent license to make, have made, use, offer to sell, sell, import and
117             otherwise transfer the Package with respect to any patent claims
118             licensable by the Copyright Holder that are necessarily infringed by the
119             Package. If you institute patent litigation (including a cross-claim or
120             counterclaim) against any party alleging that the Package constitutes
121             direct or contributory patent infringement, then this Artistic License
122             to you shall terminate on the date that such litigation is filed.
123              
124             Disclaimer of Warranty: THE PACKAGE IS PROVIDED BY THE COPYRIGHT HOLDER
125             AND CONTRIBUTORS "AS IS' AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
126             THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
127             PURPOSE, OR NON-INFRINGEMENT ARE DISCLAIMED TO THE EXTENT PERMITTED BY
128             YOUR LOCAL LAW. UNLESS REQUIRED BY LAW, NO COPYRIGHT HOLDER OR
129             CONTRIBUTOR WILL BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, OR
130             CONSEQUENTIAL DAMAGES ARISING IN ANY WAY OUT OF THE USE OF THE PACKAGE,
131             EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
132              
133              
134             =cut
135              
136             1; # End of Acme::BLACKJ::Utils