File Coverage

blib/lib/Thread/IID.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 13 13 100.0


line stmt bran cond sub pod time code
1 1     1   15329 use strict;
  1         2  
  1         26  
2 1     1   4 use warnings;
  1         1  
  1         39  
3              
4             package Thread::IID;
5             BEGIN {
6 1     1   11 $Thread::IID::VERSION = '0.010002_002';
7             }
8              
9 1     1   20 use 5.008001;
  1         2  
10              
11             require Exporter;
12              
13             our @ISA = qw(Exporter);
14              
15             # Items to export into callers namespace by default. Note: do not export
16             # names by default without a very good reason. Use EXPORT_OK instead.
17             # Do not simply export all your public functions/methods/constants.
18              
19             # This allows declaration use Thread::IID ':all';
20             # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
21             # will save memory.
22             our %EXPORT_TAGS = ( 'all' => [ qw(
23             get_interpreter_id
24             ) ] );
25              
26             our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
27              
28             our @EXPORT = ();
29              
30             our $VERSION;
31              
32             require XSLoader;
33             XSLoader::load('Thread::IID', $VERSION);
34              
35             # Preloaded methods go here.
36              
37             1;
38             __END__