From 43711c90f92b1d89b45974826e7bf6911d0cd018 Mon Sep 17 00:00:00 2001
From: Dima Kogan <dkogan@cds.caltech.edu>
Date: Tue, 11 Aug 2009 00:30:25 -0700
Subject: [PATCH] STDOUT now sensibly autoflushing also

Ignore-this: 6dcd91878412e54d72fa3180cf437cc5

darcs-hash:20090811073025-0cb85-b6b9de7ca32ba0574fcabaf63490a1c3e77c8135.gz
---
 driveGnuPlots.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/driveGnuPlots.pl b/driveGnuPlots.pl
index 7efc365..4038abf 100755
--- a/driveGnuPlots.pl
+++ b/driveGnuPlots.pl
@@ -5,6 +5,8 @@ use Time::HiRes qw( usleep );
 use IO::Handle;
 use Data::Dumper;
 
+autoflush STDOUT 1;
+
 # list containing the plot data. Each element is a hash describing the extra
 # plotting options for each curve we're plotting, and the actual data to
 # plot for each curve. The length of this list grows as the data comes
@@ -144,7 +146,6 @@ sub main {
       }
     }
 
-    select((select(STDOUT), $| = 1)[0]);
     my $xlast = 0;
 
     # regexp for a possibly floating point, possibly scientific notation number