File Coverage

blib/lib/NVDefined.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 2 0.0
total 18 20 90.0


line stmt bran cond sub pod time code
1             package NVDefined;
2              
3 1     1   1874 use strict;
  1         2  
  1         48  
4 1     1   5 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
  1         2  
  1         105  
5              
6             require Exporter;
7              
8             @ISA = qw(Exporter);
9             # Items to export into callers namespace by default. Note: do not export
10             # names by default without a very good reason. Use EXPORT_OK instead.
11             # Do not simply export all your public functions/methods/constants.
12             @EXPORT = qw(
13             NVExists
14             NVDefined
15             );
16              
17 1     1   2086 use Hash::NoVivify;
  1         6297  
  1         355  
18              
19             $VERSION = '0.02';
20              
21             sub NVExists {
22 5     5 0 313 my($hashref) = shift;
23 5         23 Hash::NoVivify::Exists($hashref, @_);
24             }
25              
26             sub NVDefined {
27 3     3 0 6057 my($hashref) = shift;
28 3         20 Hash::NoVivify::Defined($hashref, @_);
29             }
30              
31             __END__