Coverage Summary

# File Coverage

lib/Lowu.pm
Criterion | Covered | Total | %
--- | --- | --- | ---
statement | 9 | 9 | 100.0
branch | 1 | 2 | 50.0
condition |  |  | n/a
subroutine | 3 | 3 | 100.0
total | 13 | 14 | 92.9

line | stmt | bran | cond | sub | code
--- | --- | --- | --- | --- | ---
1 |  |  |  |  | package Lowu;
2 | 1 |  |  | 1 | use strictures 1;
| 1 |  |  |  |
| 1 |  |  |  |
3 |  |  |  |  |
4 | 1 |  |  | 1 | use parent 'List::Objects::WithUtils';
| 1 |  |  |  |
| 1 |  |  |  |
5 |  |  |  |  |
6 |  |  |  |  | sub import {
7 | 1 |  |  | 1 | my ($class, @funcs) = @_;
8 | 1 | 50 |  |  | @funcs = 'all' unless @funcs;
9 | 1 |  |  |  | $class->SUPER::import(
10 |  |  |  |  | +{
11 |  |  |  |  | import => [ @funcs ],
12 |  |  |  |  | to => scalar(caller),
13 |  |  |  |  | }
14 |  |  |  |  | )
15 |  |  |  |  | }
16 |  |  |  |  |
17 |  |  |  |  | print
18 |  |  |  |  | qq[I'm not sorry, on account of all the typing I've saved myself ;-)\n]
19 |  |  |  |  | unless caller;
20 |  |  |  |  | 1;
21 |  |  |  |  |
22 |  |  |  |  | =pod
23 |  |  |  |  |
24 |  |  |  |  | =for Pod::Coverage import
25 |  |  |  |  |
26 |  |  |  |  | =head1 NAME
27 |  |  |  |  |
28 |  |  |  |  | Lowu - Shortcut for importing all of List::Objects::WithUtils
29 |  |  |  |  |
30 |  |  |  |  | =head1 SYNOPSIS
31 |  |  |  |  |
32 |  |  |  |  | # Same as:
33 |  |  |  |  | # use List::Objects::WithUtils ':all';
34 |  |  |  |  | use Lowu;
35 |  |  |  |  |
36 |  |  |  |  | =head1 DESCRIPTION
37 |  |  |  |  |
38 |  |  |  |  | A short-to-type way to get all of L<List::Objects::WithUtils>, including
39 |  |  |  |  | autoboxing.
40 |  |  |  |  |
41 |  |  |  |  | If you like, you can specify params as if calling C<use
42 |  |  |  |  | List::Objects::WithUtils>:
43 |  |  |  |  |
44 |  |  |  |  | # Get array() and immarray() only:
45 |  |  |  |  | use Lowu 'array', 'immarray';
46 |  |  |  |  |
47 |  |  |  |  | =head1 AUTHOR
48 |  |  |  |  |
49 |  |  |  |  | Jon Portnoy <avenj@cobaltirc.org>
50 |  |  |  |  |
51 |  |  |  |  | =cut
52 |  |  |  |  |