comparison lib/CPT/Filetype/gbk.pm @ 1:f093e08f21f3 draft default tip

planemo upload commit 94b0cd1fff0826c6db3e7dc0c91c0c5a8be8bb0c
author cpt
date Mon, 05 Jun 2023 02:47:24 +0000
parents
children
comparison
equal deleted inserted replaced
0:b8b8b52904a5 1:f093e08f21f3
1 package CPT::Filetype::gbk;
2 no warnings;
3 use Moose;
4 with 'CPT::Filetype';
5
6 sub score {
7 my ($self) = @_;
8 my $first_line = ${$self->lines()}[0];
9 return $first_line =~ '^LOCUS';
10 }
11
12 sub name {
13 return 'genbank';
14 }
15
16
17 no Moose;
18 1;
19
20 __END__
21
22 =pod
23
24 =encoding UTF-8
25
26 =head1 NAME
27
28 CPT::Filetype::gbk
29
30 =head1 VERSION
31
32 version 1.99.4
33
34 =head1 AUTHOR
35
36 Eric Rasche <rasche.eric@yandex.ru>
37
38 =head1 COPYRIGHT AND LICENSE
39
40 This software is Copyright (c) 2014 by Eric Rasche.
41
42 This is free software, licensed under:
43
44 The GNU General Public License, Version 3, June 2007
45
46 =cut