File Coverage

blib/lib/Acme/Goto/Line.pm
Criterion Covered Total %
statement 22 22 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 28 28 100.0


line stmt bran cond sub pod time code
1             package Acme::Goto::Line;
2              
3 5     5   40018 use 5.008;
  5         18  
  5         210  
4 5     5   27 use strict;
  5         10  
  5         238  
5 5     5   27 use warnings;
  5         14  
  5         358  
6             sub gotol;
7             BEGIN {
8 5     5   27 use Exporter ();
  5         9  
  5         148  
9 5     5   21 use vars qw ($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
  5         10  
  5         1053  
10 5     5   11 $VERSION = 0.01;
11 5         83 @ISA = qw (Exporter);
12             #Give a hoot don't pollute, do not export more than needed by default
13 5         14 @EXPORT = qw (gotol);
14 5         10 @EXPORT_OK = qw (gotol);
15 5         10 %EXPORT_TAGS = ();
16              
17              
18 5         28 require XSLoader;
19 5         3534 XSLoader::load('Acme::Goto::Line', $VERSION);
20             }
21              
22             # Preloaded methods go here.
23              
24             # Autoload methods go after =cut, and are processed by the autosplit program.
25              
26             1;
27             __END__