|
0
|
1 #!/usr/bin/env perl
|
|
|
2
|
|
|
3 package Bio::Roary::Main::QueryRoary;
|
|
|
4
|
|
|
5 # ABSTRACT: Take in a groups file and the protein fasta files and output selected data
|
|
|
6 # PODNAME: query_pan_genome
|
|
|
7
|
|
|
8 =head1 SYNOPSIS
|
|
|
9
|
|
|
10 Take in a groups file and the protein fasta files and output selected data
|
|
|
11
|
|
|
12 =cut
|
|
|
13
|
|
|
14 use Cwd qw(abs_path);
|
|
|
15 BEGIN { unshift( @INC, abs_path('./lib') ) }
|
|
|
16 BEGIN { unshift( @INC, abs_path('./t/lib') ) }
|
|
|
17 use Bio::Roary::CommandLine::QueryRoary;
|
|
|
18
|
|
|
19 Bio::Roary::CommandLine::QueryRoary->new(args => \@ARGV, script_name => $0)->run;
|
