X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fwrite_fixedstep;h=17957c1bd978eb34b5b247202f7387b388084374;hb=48bea5c28b89dc5586d0bddb338ccd6ba23aa1f9;hp=a80bf0f810aa7a5af12e34f2c304e8076de22f19;hpb=eb0dc52969e6c8b65c5926ae274eaab33b382e87;p=biopieces.git diff --git a/bp_bin/write_fixedstep b/bp_bin/write_fixedstep index a80bf0f..17957c1 100755 --- a/bp_bin/write_fixedstep +++ b/bp_bin/write_fixedstep @@ -40,9 +40,11 @@ my ( $options, $in, $out, $fh, $record, $entry ); $options = Maasha::Biopieces::parse_options( [ - { long => 'no_stream', short => 'x', type => 'flag', mandatory => 'no', default => undef, allowed => undef, disallowed => undef }, - { long => 'data_out', short => 'o', type => 'file', mandatory => 'no', default => undef, allowed => undef, disallowed => undef }, - { long => 'compress', short => 'Z', type => 'flag', mandatory => 'no', default => undef, allowed => undef, disallowed => undef }, + { long => 'key', short => 'k', type => 'string', mandatory => 'no', default => undef, allowed => undef, disallowed => undef }, + { long => 'step', short => 's', type => 'uint', mandatory => 'no', default => 1, allowed => undef, disallowed => undef }, + { long => 'no_stream', short => 'x', type => 'flag', mandatory => 'no', default => undef, allowed => undef, disallowed => undef }, + { long => 'data_out', short => 'o', type => 'file', mandatory => 'no', default => undef, allowed => undef, disallowed => undef }, + { long => 'compress', short => 'Z', type => 'flag', mandatory => 'no', default => undef, allowed => undef, disallowed => undef }, ] ); @@ -53,7 +55,7 @@ $fh = Maasha::Biopieces::write_stream( $options->{ "data_out" }, $options->{ "co while ( $record = Maasha::Biopieces::get_record( $in ) ) { - if ( $entry = Maasha::UCSC::Wiggle::biopiece2fixedstep( $record ) ) { + if ( $entry = Maasha::UCSC::Wiggle::biopiece2fixedstep( $record, $options->{ "key" }, $options->{ "step" } ) ) { Maasha::UCSC::Wiggle::fixedstep_entry_put( $entry, $fh ); }