ABI
view release on metacpan or search on metacpan
use warnings;
use Module::Build;
use Module::Build::Compat;
my $build = Module::Build->new(
module_name => 'ABI',
license => 'perl',
dist_author => 'Malay <malay@bioinformatics.org>',
dist_version_from => 'ABI.pm',
build_requires =>{
'Test::More' =>0,
},
add_to_cleanup => ['ABI-*'],
create_makefile_pl => 'traditional',
);
$build->create_build_script();
Module::Build::Compat->create_makefile_pl('traditional', $build);
#$Id: Changes,v 1.1.1.1.2.2 2006/11/20 03:18:12 malay Exp $
Revision history for Perl extension ABI.
1.0 Sat Nov 18 04:22:53 2006
- Changed to Module::Build system
- Added test data
- Changed to Test::More
- Access to user modified sequence
- Access to user modified basecalls
0.01 Thu May 2 04:22:53 2002
- original version; created by h2xs 1.21 with options
-XA -n ABI
- 'Malay <malay@bioinformatics.org>'
abstract: |-
Perl module to parse chromatogram files generated by
Applied Biosystems (ABI) automated DNA sequencing machine.
by Malay K Basu (malay@bioinformatics.org); source code available at:
http://search.cpan.org/~malay
license: perl
resources:
license: http://dev.perl.org/licenses/
build_requires:
Test::More: 0
generated_by: Module::Build version 0.2805
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.2.html
version: 1.2
Makefile.PL view on Meta::CPAN
# Note: this file was auto-generated by Module::Build::Compat version 0.03
use ExtUtils::MakeMaker;
WriteMakefile
(
'PL_FILES' => {},
'INSTALLDIRS' => 'site',
'NAME' => 'ABI',
'EXE_FILES' => [],
'VERSION_FROM' => 'ABI.pm',
'PREREQ_PM' => {
'Test::More' => 0
}
)
;
- or -
perl Build.PL
./Build
./Build test
./Build install
DEPENDENCIES
This module requires Test::More
COPYRIGHT AND LICENCE
Copyright (C) 2002,2006 Malay Kumar Basu <malay@bioinformatics.org>
This module is distributed under Perl artistic license. See "License" file
for details.
# Before `make install' is performed this script should be runnable with
# `make test'. After `make install' it should work as `perl test.pl'
#########################
# change 'tests => 1' to 'tests => last_test_to_print'
#use FindBin;
#use lib "$FindBin::Bin/..";
use Test::More qw(no_plan);
#BEGIN { plan tests => 1 };
require_ok("ABI");
my $abi = ABI->new("t/TEST_modified.ab1");
isa_ok( $abi, "ABI" );
my @base_calls = $abi->get_base_calls;
#print STDERR "@base_calls";
my @b_calls =
qw(20 33 46 56 67 82 89 102 111 124 136 151 163 174 185 192 204 215
$seq =~ s/\s//g;
is ($seq,$abi->get_corrected_sequence);
#print STDERR "\n", $abi->{_index},"\n";
#print STDERR "\n", $abi->{_seq_length_corrected},"\n";
#print "@array", "\n";
#ok(1); # If we made it this far, we're ok.
#########################
# Insert your test code below, the Test module is use()ed here so read
# its man page ( perldoc Test ) for help writing this test script.
( run in 1.191 second using v1.01-cache-2.11-cpan-4d50c553e7e )