File Coverage

blib/lib/Bio/MUST/Provision/Exonerate.pm
Criterion Covered Total %
statement 13 16 81.2
branch 2 4 50.0
condition n/a
subroutine 4 6 66.6
pod 1 3 33.3
total 20 29 68.9


line stmt bran cond sub pod time code
1             package Bio::MUST::Provision::Exonerate;
2             # ABSTRACT: Internal class for app provisioning system
3             $Bio::MUST::Provision::Exonerate::VERSION = '0.191910';
4             # AUTOGENERATED CODE! DO NOT MODIFY THIS FILE!
5              
6 2     2   2321 use Modern::Perl '2011';
  2         1185  
  2         12  
7 2     2   370 use Carp;
  2         5  
  2         135  
8              
9 2     2   15 use parent qw(App::Provision::Tiny);
  2         5  
  2         19  
10              
11              
12 0     0 0 0 sub deps { return qw(brew) }
13              
14             sub condition {
15 2     2 1 126 my $self = shift;
16              
17 2         17198 my $condition = qx{which exonerate} =~ m/exonerate$/xms;
18 2 50       414 carp '[BMD] Note: Exonerate executable not found; I can try brewing it.'
19             unless $condition;
20              
21 2 50       2091 return $condition ? 1 : 0;
22             }
23              
24             sub meet {
25 0     0 0   my $self = shift;
26              
27 0           return $self->recipe(
28             ['brew tap brewsci/bio'],
29             ['brew install exonerate'],
30             );
31             }
32              
33             1;
34              
35             __END__
36              
37             =pod
38              
39             =head1 NAME
40              
41             Bio::MUST::Provision::Exonerate - Internal class for app provisioning system
42              
43             =head1 VERSION
44              
45             version 0.191910
46              
47             =head1 AUTHOR
48              
49             Denis BAURAIN <denis.baurain@uliege.be>
50              
51             =head1 COPYRIGHT AND LICENSE
52              
53             This software is copyright (c) 2013 by University of Liege / Unit of Eukaryotic Phylogenomics / Denis BAURAIN.
54              
55             This is free software; you can redistribute it and/or modify it under
56             the same terms as the Perl 5 programming language system itself.
57              
58             =cut