X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fcount_vals;h=8081e5c98e661cddd658cb760af0bc3b3548e70f;hb=5de6112b70b59420b245ce636a8b2e3c90acbe00;hp=7f0fe503676d1a4bb2105815f14d390b16eacd95;hpb=66938be910a5642b50ddf28991649858b5c36580;p=biopieces.git diff --git a/bp_bin/count_vals b/bp_bin/count_vals index 7f0fe50..8081e5c 100755 --- a/bp_bin/count_vals +++ b/bp_bin/count_vals @@ -1,4 +1,4 @@ -#!/usr/bin/env perl -w +#!/usr/bin/env perl # Copyright (C) 2007-2009 Martin A. Hansen. @@ -26,6 +26,7 @@ # >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< +use warnings; use strict; use Maasha::Filesys; use Maasha::Biopieces; @@ -105,8 +106,6 @@ foreach $record ( @records ) unlink $tmp_file; -Maasha::Filesys::dir_remove( $tmp_dir ); - Maasha::Biopieces::close_stream( $in ); Maasha::Biopieces::close_stream( $out );