Mercurial > repos > dereeper > roary_plots
diff Roary/t/Bio/Roary/External/CheckTools.t @ 0:c47a5f61bc9f draft
Uploaded
author | dereeper |
---|---|
date | Fri, 14 May 2021 20:27:06 +0000 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Roary/t/Bio/Roary/External/CheckTools.t Fri May 14 20:27:06 2021 +0000 @@ -0,0 +1,23 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use Data::Dumper; +use Cwd; +use Test::Output; + +BEGIN { unshift( @INC, './lib' ) } + +BEGIN { + use Test::Most; + use_ok('Bio::Roary::External::CheckTools'); +} +ok( my $check_tools = Bio::Roary::External::CheckTools->new(), 'initialise checking for tools' ); +for my $tool ( ( 'parallel', 'blastp', 'makeblastdb', 'mcl', 'bedtools', 'prank', 'mafft', 'grep', 'sed', 'awk', ) ) { + my $pattern = "Looking for '$tool' - found "; + stderr_like { $check_tools->check_tool($tool); } qr/$pattern/, "Check for $tool"; +} + +stderr_like { $check_tools->check_all_tools; } qr/Looking for /, "Check for all tools"; +1; + +done_testing();