File Coverage

blib/lib/Rex/Args/String.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 11 12 91.6


line stmt bran cond sub pod time code
1             #
2             # (c) Jan Gehring
3             #
4              
5             package Rex::Args::String;
6              
7 2     2   29 use v5.12.5;
  2         6  
8 2     2   14 use warnings;
  2         6  
  2         204  
9              
10             our $VERSION = '1.14.3'; # VERSION
11              
12             sub get {
13 5     5 0 9 my ( $class, $name ) = @_;
14              
15 5         11 my $arg = shift @ARGV;
16 5         17 return $arg;
17             }
18              
19             1;