File Coverage

blib/lib/Scalar/Util/Numeric.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Scalar::Util::Numeric;
2              
3 1     1   1203 use 5.008000;
  1         4  
  1         64  
4              
5 1     1   6 use strict;
  1         2  
  1         38  
6 1     1   24 use warnings;
  1         2  
  1         39  
7              
8 1     1   6 use base qw(Exporter);
  1         2  
  1         102  
9 1     1   6 use XSLoader;
  1         1  
  1         145  
10              
11             our $VERSION = '0.22';
12              
13             our %EXPORT_TAGS = (
14             'all' => [ qw(isbig isfloat isinf isint isnan isneg isnum isuv) ],
15             );
16              
17             our @EXPORT_OK = ( map { @$_ } values %EXPORT_TAGS );
18              
19             XSLoader::load(__PACKAGE__, $VERSION);
20              
21             1;
22              
23             __END__