diff --git a/tsplot b/tsplot
index 4ea0151..b7fe042 100755
--- a/tsplot
+++ b/tsplot
@@ -2,6 +2,8 @@
 use strict;
 use TimeSeries;
 
+binmode STDOUT, ':raw';
+
 my $ts = TimeSeries->new();
 while (<>) {
     my @legend = split;