From 139f89e145ebb7b38bfa72596a33ebaaa9c9974b Mon Sep 17 00:00:00 2001 From: Dima Kogan Date: Thu, 23 Sep 2010 23:02:35 -0700 Subject: [PATCH] minor streamlining --- feedGnuplot.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/feedGnuplot.pl b/feedGnuplot.pl index 0bfb0d9..4516d27 100755 --- a/feedGnuplot.pl +++ b/feedGnuplot.pl @@ -486,9 +486,9 @@ sub plotStoredData { # send each point to gnuplot. Ignore the first "point" since it's the # curve options - for my $elem (@{$buf}[1..$#$buf]) { - my ($x, $y) = @$elem; - print PIPE "$x $y\n"; + for my $elem (@{$buf}[1..$#$buf]) + { + print PIPE "@$elem\n"; } print PIPE "e\n"; }