Bio-MUST-Core
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
bin/list2mapper.pl view on Meta::CPAN
#!/usr/bin/env perl
# PODNAME: list2mapper.pl
# ABSTRACT: Build final id mapper from id list using the NCBI Taxonomy database
use Modern::Perl '2011';
use autodie;
use Getopt::Euclid qw(:vars);
use Smart::Comments;
use Bio::MUST::Core;
use Bio::MUST::Core::Utils qw(change_suffix);
use aliased 'Bio::MUST::Core::IdList';
use aliased 'Bio::MUST::Core::Taxonomy';
# build taxonomy object
my $tax = Taxonomy->new_from_cache( tax_dir => $ARGV_taxdir );
my $method = $ARGV_from_must ? 'load_lis' : 'load';
for my $infile (@ARGV_infiles) {
### Processing: $infile
my $list = IdList->$method($infile);
my $mapper = $tax->tax_mapper(
$list, { append_acc => $ARGV_append_acc }
);
my $outfile = change_suffix($infile, '.final-idm');
$mapper->store($outfile);
}
__END__
=pod
=head1 NAME
list2mapper.pl - Build final id mapper from id list using the NCBI Taxonomy database
=head1 VERSION
version 0.240390
=head1 USAGE
list2mapper.pl --taxdir=<dir> <infiles> [optional arguments]
=head1 REQUIRED ARGUMENTS
=over
=item <infiles>
Path to input IDL files [repeatable argument].
=for Euclid: infiles.type: readable
repeatable
=item --taxdir=<dir>
Path to local mirror of the NCBI Taxonomy database.
=for Euclid: dir.type: string
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.470 second using v1.00-cache-2.02-grep-82fe00e-cpan-2c419f77a38b )