File Coverage

blib/lib/Log/Dispatch/Vars.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Log::Dispatch::Vars;
2              
3 29     29   201 use strict;
  29         59  
  29         787  
4 29     29   156 use warnings;
  29         110  
  29         1178  
5              
6             our $VERSION = '2.71';
7              
8 29     29   156 use Exporter qw( import );
  29         120  
  29         5339  
9              
10             our @EXPORT_OK = qw(
11             %CanonicalLevelNames
12             %LevelNamesToNumbers
13             @OrderedLevels
14             );
15              
16             ## no critic (Variables::ProhibitPackageVars)
17             our %CanonicalLevelNames = (
18             (
19             map { $_ => $_ }
20             qw(
21             debug
22             info
23             notice
24             warning
25             error
26             critical
27             alert
28             emergency
29             )
30             ),
31             warn => 'warning',
32             err => 'error',
33             crit => 'critical',
34             emerg => 'emergency',
35             );
36              
37             our @OrderedLevels = qw(
38             debug
39             info
40             notice
41             warning
42             error
43             critical
44             alert
45             emergency
46             );
47              
48             our %LevelNamesToNumbers = (
49             ( map { $OrderedLevels[$_] => $_ } 0 .. $#OrderedLevels ),
50             warn => 3,
51             err => 4,
52             crit => 5,
53             emerg => 7,
54             );
55              
56             1;
57              
58             # ABSTRACT: Variables used internally by multiple packages
59              
60             __END__
61              
62             =pod
63              
64             =encoding UTF-8
65              
66             =head1 NAME
67              
68             Log::Dispatch::Vars - Variables used internally by multiple packages
69              
70             =head1 VERSION
71              
72             version 2.71
73              
74             =head1 DESCRIPTION
75              
76             There are no user-facing parts here.
77              
78             =head1 SUPPORT
79              
80             Bugs may be submitted at L<https://github.com/houseabsolute/Log-Dispatch/issues>.
81              
82             =head1 SOURCE
83              
84             The source code repository for Log-Dispatch can be found at L<https://github.com/houseabsolute/Log-Dispatch>.
85              
86             =head1 AUTHOR
87              
88             Dave Rolsky <autarch@urth.org>
89              
90             =head1 COPYRIGHT AND LICENSE
91              
92             This software is Copyright (c) 2023 by Dave Rolsky.
93              
94             This is free software, licensed under:
95              
96             The Artistic License 2.0 (GPL Compatible)
97              
98             The full text of the license can be found in the
99             F<LICENSE> file included with this distribution.
100              
101             =cut