view release on metacpan or  search on metacpan

ABI.pm  view on Meta::CPAN

	}
}

sub _set_mac_header {
	my $self = shift;
	$self->{_mac_header} = 128;
}

sub _set_index {
	my $self         = shift;
	my $data_counter = 0;
	my $pbas_counter = 0;
	my $ploc_counter = 0;
	my ( $num_records, $buf );

	#print $self->{_fh}, "\n";
	#print $self->{_mac_header}, "\n";
	seek( $self->{_fh}, $self->{_abs_index} + $self->{_mac_header}, 0 );
	read( $self->{_fh}, $buf, 4 );
	$self->{_index} = unpack( "N", $buf );

Changes  view on Meta::CPAN

#$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