File Coverage

lib/App/SimulateReads/CLI.pm
Criterion Covered Total %
statement 6 7 85.7
branch n/a
condition n/a
subroutine 2 3 66.6
pod 1 1 100.0
total 9 11 81.8


line stmt bran cond sub pod time code
1             package App::SimulateReads::CLI;
2             # ABSTRACT: Base class for command line interface.
3              
4 1     1   571 use App::SimulateReads::Base 'class';
  1         1  
  1         8  
5 1     1   13 use Path::Class 'file';
  1         2  
  1         202  
6              
7             our $VERSION = '0.05'; # VERSION
8              
9             has 'argv' => (
10             is => 'ro',
11             isa => 'ArrayRef',
12             default => sub { \@ARGV }
13             );
14              
15             has 'progname' => (
16             is => 'ro',
17             isa => 'Str',
18             default => file($0)->basename
19             );
20              
21             sub opt_spec {
22 0     0 1   'help|h',
23             'man|M'
24             }
25              
26             __END__
27              
28             =pod
29              
30             =encoding UTF-8
31              
32             =head1 NAME
33              
34             App::SimulateReads::CLI - Base class for command line interface.
35              
36             =head1 VERSION
37              
38             version 0.05
39              
40             =head1 SYNOPSIS
41              
42             extends 'App::SimulateReads::CLI';
43              
44             =head1 DESCRIPTION
45              
46             This is the base class for CLI interface
47              
48             =head1 METHODS
49              
50             =head2 argv
51              
52             This mthod returns the \@ARGV
53              
54             =head2 progname
55              
56             This method returns the program name
57              
58             =head2 opt_spec
59              
60             This is the global options method. Child classes may
61             override it and provides more options by $self->super
62              
63             =head1 SEE ALSO
64              
65             =over 4
66              
67             =item *
68              
69             L<App::SimulateReads::CLI::App>
70              
71             =item *
72              
73             L<App::SimulateReads::CLI::Command>
74              
75             =back
76              
77             =head1 AUTHOR
78              
79             Thiago L. A. Miller <tmiller@mochsl.org.br>
80              
81             =head1 COPYRIGHT AND LICENSE
82              
83             This software is Copyright (c) 2017 by Teaching and Research Institute from Sírio-Libanês Hospital.
84              
85             This is free software, licensed under:
86              
87             The GNU General Public License, Version 3, June 2007
88              
89             =cut