File Coverage

blib/lib/Acme/SGABRIEL/Utils.pm
Criterion Covered Total %
statement 12 16 75.0
branch n/a
condition n/a
subroutine 4 5 80.0
pod 1 1 100.0
total 17 22 77.2


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