Mercurial > repos > cpt > cpt_psm_prep

comparison cpt_psm_prep/lib/CPT/Bio/DataSource/GenBank.pm @ 0:e4de0a0e90c8 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author cpt
date Tue, 05 Jul 2022 05:38:34 +0000
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:e4de0a0e90c8
1 package CPT::Bio::DataSource::GenBank;
2 no warnings;
3 use Moose;
4 with 'CPT::Bio::DataSource';
5
6 has 'file' => ( is => 'rw', isa => 'Str' );
7
8
9 sub getSeqIO {
10 my ($self) = @_;
11 use Bio::SeqIO;
12 my $seqio = Bio::SeqIO->new(
13 -file => $self->file(),
14 -format => 'GenBank',
15 );
16 my @results;
17 return $seqio;
18 }
19
20 no Moose;
21 1;
22
23 __END__
24
25 =pod
26
27 =encoding UTF-8
28
29 =head1 NAME
30
31 CPT::Bio::DataSource::GenBank
32
33 =head1 VERSION
34
35 version 1.99.4
36
37 =head2 getSeqIO
38
39 $gbk_ds->getSeqIO();
40
41 supposed to return a genabnk DS. Not tested.
42
43 =head1 AUTHOR
44
45 Eric Rasche <rasche.eric@yandex.ru>
46
47 =head1 COPYRIGHT AND LICENSE
48
49 This software is Copyright (c) 2014 by Eric Rasche.
50
51 This is free software, licensed under:
52
53 The GNU General Public License, Version 3, June 2007
54
55 =cut