| 
0
 | 
     1 
 | 
| 
 | 
     2 package Bio::Pfam::HMM::HMMMatch;
 | 
| 
 | 
     3 
 | 
| 
 | 
     4 use strict;
 | 
| 
 | 
     5 use warnings;
 | 
| 
 | 
     6 
 | 
| 
 | 
     7 use Moose;
 | 
| 
 | 
     8 use Moose::Util::TypeConstraints;
 | 
| 
 | 
     9 
 | 
| 
 | 
    10 
 | 
| 
 | 
    11 subtype 'evalue'
 | 
| 
 | 
    12   => as Str
 | 
| 
 | 
    13   => where { $_ =~ m/^(\d+(\.\d+){0,1}e[+|-]\d+|\d+\.\d+|\d+)$/ }
 | 
| 
 | 
    14   => message { "$_ does not look like an evalue" };
 | 
| 
 | 
    15 
 | 
| 
 | 
    16 has 'evalue' => (
 | 
| 
 | 
    17   isa       => 'evalue', 
 | 
| 
 | 
    18   is        => 'rw',
 | 
| 
 | 
    19   required  => 1
 | 
| 
 | 
    20 );
 | 
| 
 | 
    21 
 | 
| 
 | 
    22 has 'bits' => (
 | 
| 
 | 
    23   isa => 'Str',
 | 
| 
 | 
    24   is  => 'rw',
 | 
| 
 | 
    25   required => 1
 | 
| 
 | 
    26 );
 | 
| 
 | 
    27 
 | 
| 
 | 
    28 has 'name' => (
 | 
| 
 | 
    29   isa => 'Str',
 | 
| 
 | 
    30   is  => 'rw',
 | 
| 
 | 
    31   required => 1
 | 
| 
 | 
    32 );
 | 
| 
 | 
    33 
 | 
| 
 | 
    34 has bias => (
 | 
| 
 | 
    35   isa => 'Num',
 | 
| 
 | 
    36   is  => 'rw'
 | 
| 
 | 
    37 );
 | 
| 
 | 
    38 
 | 
| 
 | 
    39   __PACKAGE__->meta->make_immutable;
 | 
| 
 | 
    40 
 | 
| 
 | 
    41 =head1 COPYRIGHT
 | 
| 
 | 
    42 
 | 
| 
 | 
    43 Copyright (c) 2007: Genome Research Ltd.
 | 
| 
 | 
    44 
 | 
| 
 | 
    45 Authors: Rob Finn (rdf@sanger.ac.uk), John Tate (jt6@sanger.ac.uk)
 | 
| 
 | 
    46 
 | 
| 
 | 
    47 This is free software; you can redistribute it and/or modify it under
 | 
| 
 | 
    48 the terms of the GNU General Public License as published by the Free Software
 | 
| 
 | 
    49 Foundation; either version 2 of the License, or (at your option) any later
 | 
| 
 | 
    50 version.
 | 
| 
 | 
    51 
 | 
| 
 | 
    52 This program is distributed in the hope that it will be useful, but WITHOUT
 | 
| 
 | 
    53 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
 | 
| 
 | 
    54 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
 | 
| 
 | 
    55 details.
 | 
| 
 | 
    56 
 | 
| 
 | 
    57 You should have received a copy of the GNU General Public License along with
 | 
| 
 | 
    58 this program. If not, see <http://www.gnu.org/licenses/>.
 | 
| 
 | 
    59 
 | 
| 
 | 
    60 =cut
 | 
| 
 | 
    61 
 | 
| 
 | 
    62 1;
 |