Mercurial > repos > dereeper > roary_plots
diff Roary/t/Bio/Roary/CommandLine/ParallelAllAgainstAllBlastp.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/CommandLine/ParallelAllAgainstAllBlastp.t Fri May 14 20:27:06 2021 +0000 @@ -0,0 +1,29 @@ +#!/usr/bin/env perl +use Moose; +use Data::Dumper; +use Cwd; + +BEGIN { unshift( @INC, './lib' ) } +BEGIN { unshift( @INC, './t/lib' ) } +with 'TestHelper'; + +BEGIN { + use Test::Most; + use_ok('Bio::Roary::CommandLine::ParallelAllAgainstAllBlastp'); +} +my $script_name = 'Bio::Roary::CommandLine::ParallelAllAgainstAllBlastp'; +my $cwd = getcwd(); + +system('touch empty_file'); +my %scripts_and_expected_files = ( + '-m '.$cwd.'/t/bin/dummy_makeblastdb -b '.$cwd.'/t/bin/dummy_blastp -j Local t/data/example_1.faa' => + [ 'blast_results', 't/data/empty_file' ], + '-o different_output_filename -m '.$cwd.'/t/bin/dummy_makeblastdb -b '.$cwd.'/t/bin/dummy_blastp -j Local t/data/example_1.faa' => + [ 'different_output_filename', 't/data/empty_file' ], + '-h' => + [ 'empty_file', 't/data/empty_file' ], +); + +mock_execute_script_and_check_output( $script_name, \%scripts_and_expected_files ); + +done_testing(); \ No newline at end of file