File Coverage

blib/lib/Tapper/CLI/API.pm
Criterion Covered Total %
statement 12 17 70.5
branch 0 2 0.0
condition n/a
subroutine 4 6 66.6
pod 0 2 0.0
total 16 27 59.2


line stmt bran cond sub pod time code
1             package Tapper::CLI::API;
2             our $AUTHORITY = 'cpan:TAPPER';
3             $Tapper::CLI::API::VERSION = '5.0.6';
4 1     1   844 use strict;
  1         2  
  1         29  
5 1     1   4 use warnings;
  1         2  
  1         27  
6              
7 1     1   412 use parent 'App::Cmd';
  1         295  
  1         5  
8 1     1   33756 use Tapper::Model 'model';
  1         1128237  
  1         177  
9              
10             sub opt_spec
11             {
12 0     0 0   my ( $class, $app ) = @_;
13              
14             return (
15 0           [ 'help' => "This usage screen" ],
16             $class->options($app),
17             );
18             }
19              
20             sub validate_args
21             {
22 0     0 0   my ( $self, $opt, $args ) = @_;
23              
24 0 0         die $self->_usage_text if $opt->{help};
25 0           $self->validate( $opt, $args );
26             }
27              
28             1;
29              
30             __END__
31              
32             =pod
33              
34             =encoding UTF-8
35              
36             =head1 NAME
37              
38             Tapper::CLI::API
39              
40             =head1 AUTHOR
41              
42             AMD OSRC Tapper Team <tapper@amd64.org>
43              
44             =head1 COPYRIGHT AND LICENSE
45              
46             This software is Copyright (c) 2020 by Advanced Micro Devices, Inc..
47              
48             This is free software, licensed under:
49              
50             The (two-clause) FreeBSD License
51              
52             =cut