File Coverage

blib/lib/File/Package.pm
Criterion Covered Total %
statement 27 27 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod n/a
total 36 36 100.0


line stmt bran cond sub pod time code
1             #!perl
2             #
3             # Documentation, copyright and license is at the end of this file.
4             #
5            
6             package File::Package;
7            
8 1     1   114274 use 5.001;
  1         4  
  1         33  
9 1     1   5 use strict;
  1         2  
  1         29  
10 1     1   6 use warnings;
  1         5  
  1         29  
11 1     1   5 use warnings::register;
  1         1  
  1         102  
12            
13 1     1   4 use vars qw($VERSION $DATE $FILE);
  1         1  
  1         67  
14             $VERSION = '1.16';
15             $DATE = '2004/04/26';
16             $FILE = __FILE__;
17            
18 1     1   5 use File::Spec;
  1         1  
  1         22  
19 1     1   830 use SelfLoader;
  1         9163  
  1         60  
20            
21 1     1   8 use vars qw(@ISA @EXPORT_OK);
  1         2  
  1         66  
22             require Exporter;
23             @ISA= qw(Exporter);
24             @EXPORT_OK = qw(load_package is_package_loaded eval_str);
25 1     1   4 use vars qw(@import);
  1         2  
  1         38  
26            
27             1;
28            
29             __DATA__