X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fget_genome_align;h=566ea6e365072e40f388b27a6b9784e503547439;hb=2f0fd91b461033529a4a72e161bd133252a22eb6;hp=b1e5c1d31a140637b515eb139c36dc6b4b19b173;hpb=66938be910a5642b50ddf28991649858b5c36580;p=biopieces.git diff --git a/bp_bin/get_genome_align b/bp_bin/get_genome_align index b1e5c1d..566ea6e 100755 --- a/bp_bin/get_genome_align +++ b/bp_bin/get_genome_align @@ -1,4 +1,4 @@ -#!/usr/bin/env perl -w +#!/usr/bin/env perl # Copyright (C) 2007-2009 Martin A. Hansen. @@ -26,11 +26,11 @@ # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< +use warnings; use strict; use Maasha::Biopieces; use Maasha::Common; use Maasha::UCSC; -use Maasha::Filesys; # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @@ -117,8 +117,6 @@ while ( $record = Maasha::Biopieces::get_record( $in ) ) $align_num++; } -Maasha::Filesys::dir_remove( $tmp_dir ); - Maasha::Biopieces::close_stream( $in ); Maasha::Biopieces::close_stream( $out );