Mercurial > repos > dereeper > roary_plots

comparison Roary/t/Bio/Roary/External/CheckTools.t @ 0:c47a5f61bc9f draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author dereeper
date Fri, 14 May 2021 20:27:06 +0000
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:c47a5f61bc9f
1 #!/usr/bin/env perl
2 use strict;
3 use warnings;
4 use Data::Dumper;
5 use Cwd;
6 use Test::Output;
7
8 BEGIN { unshift( @INC, './lib' ) }
9
10 BEGIN {
11 use Test::Most;
12 use_ok('Bio::Roary::External::CheckTools');
13 }
14 ok( my $check_tools = Bio::Roary::External::CheckTools->new(), 'initialise checking for tools' );
15 for my $tool ( ( 'parallel', 'blastp', 'makeblastdb', 'mcl', 'bedtools', 'prank', 'mafft', 'grep', 'sed', 'awk', ) ) {
16 my $pattern = "Looking for '$tool' - found ";
17 stderr_like { $check_tools->check_tool($tool); } qr/$pattern/, "Check for $tool";
18 }
19
20 stderr_like { $check_tools->check_all_tools; } qr/Looking for /, "Check for all tools";
21 1;
22
23 done_testing();