File Coverage

blib/lib/Getopt/EX/debug.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             =head1 NAME
2              
3             Getopt::EX::debug - Getopt::EX debug module
4              
5             =head1 SYNOPSIS
6              
7             command -Mdebug
8              
9             =head1 DESCRIPTION
10              
11             Enable L debug mode.
12              
13             =head1 AUTHOR
14              
15             Kazumasa Utashiro
16              
17             =head1 LICENSE
18              
19             Copyright 2022 Kazumasa Utashiro
20              
21             This library is free software; you can redistribute it and/or modify
22             it under the same terms as Perl itself.
23              
24             =cut
25              
26             package Getopt::EX::debug;
27              
28             our $VERSION = '1.01';
29              
30 1     1   753 use strict;
  1         2  
  1         27  
31 1     1   13 use warnings;
  1         1  
  1         28  
32              
33 1     1   511 use Getopt::EX::Loader;
  1         32474  
  1         56  
34              
35             $Getopt::EX::Loader::debug = 1;
36              
37             1;