X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fbiostat;h=175d6fd5c1d9b75e6dedab1cffed0969ebfba0ff;hb=d5a8efe4d822a139b452bd35e2353aaccd84ac4c;hp=6a7d0406bc0fd1c7d5ceb3138e15068e1633b0d2;hpb=9bf550c4335d8860c5f6f9c4db0f385f1b36c1dd;p=biopieces.git diff --git a/bp_bin/biostat b/bp_bin/biostat index 6a7d040..175d6fd 100755 --- a/bp_bin/biostat +++ b/bp_bin/biostat @@ -76,11 +76,6 @@ while ( 1 ) push @table, $info; } - else - { - print STDERR "Removing stale file: $file\n"; - unlink $file; - } } if ( $options->{ 'sort' } =~ /^(USER|TMP_DIR|START_TIME|RUN_TIME|COMMAND)$/ ) { @@ -169,6 +164,7 @@ sub get_status_info my ( $fh, $line, $time, $args, $tmp_dir, $du ); $fh = Maasha::Filesys::file_read_open( $file ); + flock($fh, 1); $line = <$fh>; close $fh;