File Coverage

blib/lib/Git/TagVersion/Cmd/Command/list.pm
Criterion Covered Total %
statement 3 8 37.5
branch n/a
condition n/a
subroutine 1 2 50.0
pod 1 1 100.0
total 5 11 45.4


line stmt bran cond sub pod time code
1             package Git::TagVersion::Cmd::Command::list;
2              
3 1     1   1700 use Moose;
  1         3  
  1         10  
4              
5             extends 'Git::TagVersion::Cmd::Command';
6              
7             our $VERSION = '1.01'; # VERSION
8             # ABSTRACT: print all versions
9              
10             sub execute {
11 0     0 1   my ( $self, $opt, $args ) = @_;
12            
13 0           foreach my $v ( @{$self->tag_version->versions} ) {
  0            
14 0           print $v->as_string."\n";
15             }
16              
17 0           return;
18             }
19              
20             1;
21              
22             __END__
23              
24             =pod
25              
26             =encoding UTF-8
27              
28             =head1 NAME
29              
30             Git::TagVersion::Cmd::Command::list - print all versions
31              
32             =head1 VERSION
33              
34             version 1.01
35              
36             =head1 AUTHOR
37              
38             Markus Benning <ich@markusbenning.de>
39              
40             =head1 COPYRIGHT AND LICENSE
41              
42             This software is copyright (c) 2015 by Markus Benning <ich@markusbenning.de>.
43              
44             This is free software; you can redistribute it and/or modify it under
45             the same terms as the Perl 5 programming language system itself.
46              
47             =cut