# >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
+use warnings;
use strict;
use Maasha::Biopieces;
[
{ long => 'key', short => 'k', type => 'string', mandatory => 'no', default => 'ID', allowed => undef, disallowed => undef },
{ long => 'prefix', short => 'p', type => 'string', mandatory => 'no', default => 'ID', allowed => undef, disallowed => undef },
+ { long => 'offset', short => 'o', type => 'uint', mandatory => 'no', default => '0', allowed => undef, disallowed => undef },
]
);
$key = $options->{ "key" };
$prefix = $options->{ "prefix" };
-$i = 0;
+$i = $options->{ "offset" };
while ( $record = Maasha::Biopieces::get_record( $in ) )
{