File Coverage

blib/lib/POE/Component/Pluggable/Constants.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package POE::Component::Pluggable::Constants;
2             $POE::Component::Pluggable::Constants::VERSION = '1.28';
3             #ABSTRACT: importable constants for POE::Component::Pluggable
4              
5 1     1   13 use strict;
  1         2  
  1         33  
6 1     1   4 use warnings;
  1         1  
  1         38  
7              
8             require Exporter;
9 1     1   5 use base qw(Exporter);
  1         2  
  1         162  
10             our @EXPORT_OK = qw(
11             PLUGIN_EAT_NONE PLUGIN_EAT_CLIENT PLUGIN_EAT_PLUGIN PLUGIN_EAT_ALL
12             );
13             our %EXPORT_TAGS = ( ALL => [@EXPORT_OK] );
14              
15             use constant {
16 1         131 PLUGIN_EAT_NONE => 1,
17             PLUGIN_EAT_CLIENT => 2,
18             PLUGIN_EAT_PLUGIN => 3,
19             PLUGIN_EAT_ALL => 4,
20 1     1   5 };
  1         2  
21              
22             qq[Constantly plugging];
23              
24             __END__