blib/lib/DDG/Fathead.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 13 | 13 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 4 | 4 | 100.0 |
pod | n/a | ||
total | 17 | 17 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package DDG::Fathead; | ||||||
2 | our $AUTHORITY = 'cpan:DDG'; | ||||||
3 | # ABSTRACT: Fathead package for easy keywords | ||||||
4 | $DDG::Fathead::VERSION = '1016'; | ||||||
5 | 2 | 2 | 591 | use strict; | |||
2 | 3 | ||||||
2 | 43 | ||||||
6 | 2 | 2 | 7 | use warnings; | |||
2 | 2 | ||||||
2 | 34 | ||||||
7 | 2 | 2 | 668 | use DDG::Meta; | |||
2 | 7 | ||||||
2 | 140 | ||||||
8 | |||||||
9 | sub import { | ||||||
10 | 5 | 5 | 1321 | my ( $class ) = @_; | |||
11 | 5 | 11 | my $target = caller; | ||||
12 | |||||||
13 | 5 | 23 | DDG::Meta->apply_base_to_package($target); | ||||
14 | 5 | 3859 | DDG::Meta->apply_fathead_keywords($target); | ||||
15 | } | ||||||
16 | |||||||
17 | |||||||
18 | 1; | ||||||
19 | |||||||
20 | __END__ |