Mercurial > repos > dereeper > roary_plots
view Roary/t/Bio/Roary/ParallelAllAgainstAllBlast.t @ 0:c47a5f61bc9f draft
Uploaded
author | dereeper |
---|---|
date | Fri, 14 May 2021 20:27:06 +0000 |
parents | |
children |
line wrap: on
line source
#!/usr/bin/env perl use strict; use warnings; use Data::Dumper; use Cwd; BEGIN { unshift( @INC, './lib' ) } $ENV{PATH} .= ":./bin"; BEGIN { use Test::Most; use_ok('Bio::Roary::ParallelAllAgainstAllBlast'); } my $obj; my $cwd = getcwd(); ok($obj = Bio::Roary::ParallelAllAgainstAllBlast->new( fasta_file => 't/data/example_1.faa', blastp_exec => $cwd.'/t/bin/dummy_blastp', makeblastdb_exec => $cwd.'/t/bin/dummy_makeblastdb', ),'initialise obj with mocked external applications'); ok($obj->run(),'Run locally'); ok(-e $obj->_working_directory_name.'/blast_results', 'Combined blast results'); unlink('output_contigs.phr'); unlink('output_contigs.pin'); unlink('output_contigs.psq'); unlink('results.out'); done_testing();