File Coverage

blib/lib/Bio/Phylo/Matrices/Datatype/Protein.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Bio::Phylo::Matrices::Datatype::Protein;
2 1     1   6 use strict;
  1         2  
  1         26  
3 1     1   5 use warnings;
  1         1  
  1         23  
4 1     1   4 use base 'Bio::Phylo::Matrices::Datatype';
  1         2  
  1         181  
5             our ( $LOOKUP, $MISSING, $GAP );
6              
7             =head1 NAME
8              
9             Bio::Phylo::Matrices::Datatype::Protein - Validator subclass,
10             no serviceable parts inside
11              
12             =head1 DESCRIPTION
13              
14             The Bio::Phylo::Matrices::Datatype::* classes are used to validate data
15             contained by L<Bio::Phylo::Matrices::Matrix> and L<Bio::Phylo::Matrices::Datum>
16             objects.
17              
18             =cut
19              
20             # podinherit_insert_token
21              
22             =head1 SEE ALSO
23              
24             There is a mailing list at L<https://groups.google.com/forum/#!forum/bio-phylo>
25             for any user or developer questions and discussions.
26              
27             =over
28              
29             =item L<Bio::Phylo::Matrices::Datatype>
30              
31             This class subclasses L<Bio::Phylo::Matrices::Datatype>.
32              
33             =item L<Bio::Phylo::Manual>
34              
35             Also see the manual: L<Bio::Phylo::Manual> and L<http://rutgervos.blogspot.com>.
36              
37             =back
38              
39             =head1 CITATION
40              
41             If you use Bio::Phylo in published research, please cite it:
42              
43             B<Rutger A Vos>, B<Jason Caravas>, B<Klaas Hartmann>, B<Mark A Jensen>
44             and B<Chase Miller>, 2011. Bio::Phylo - phyloinformatic analysis using Perl.
45             I<BMC Bioinformatics> B<12>:63.
46             L<http://dx.doi.org/10.1186/1471-2105-12-63>
47              
48             =head1 FORUM
49              
50             CPAN hosts a discussion forum for Bio::Phylo. If you have trouble
51             using this module the discussion forum is a good place to start
52             posting questions (NOT bug reports, see below):
53             L<http://www.cpanforum.com/dist/Bio-Phylo>
54              
55             =cut
56              
57             $LOOKUP = {
58             'A' => ['A'],
59             'B' => [ 'D', 'N' ],
60             'C' => ['C'],
61             'D' => ['D'],
62             'E' => ['E'],
63             'F' => ['F'],
64             'G' => ['G'],
65             'H' => ['H'],
66             'I' => ['I'],
67             'K' => ['K'],
68             'L' => ['L'],
69             'M' => ['M'],
70             'N' => ['N'],
71             'P' => ['P'],
72             'Q' => ['Q'],
73             'R' => ['R'],
74             'S' => ['S'],
75             'T' => ['T'],
76             'U' => ['U'],
77             'V' => ['V'],
78             'W' => ['W'],
79             'X' => ['X'],
80             'Y' => ['Y'],
81             'Z' => [ 'E', 'Q' ],
82             '*' => ['*'],
83             };
84             $MISSING = '?';
85             $GAP = '-';
86             1;