diff --git a/tsplot b/tsplot
index 6e09cbc..3ce4b74 100755
--- a/tsplot
+++ b/tsplot
@@ -57,6 +57,7 @@ my $stacked = 0;
 my @yrange;
 my $keeptempfiles;
 my $finalresolution;
+my $legend_position = 'top right';
 
 GetOptions('output_format|output-format=s' => \$output_format,
 	   'log_y|log-y'		   => \$log_y,
@@ -67,6 +68,7 @@ GetOptions('output_format|output-format=s' => \$output_format,
 	   'yrange=s{2}'		   => \@yrange,
 	   'keeptempfiles'		   => \$keeptempfiles,
 	   'finalresolution=i'		   => \$finalresolution,
+	   'legend-position=s'		   => \$legend_position,
           ) 
     or pod2usage(verbose => 0);
 
@@ -76,6 +78,7 @@ binmode STDOUT, ':raw';
 
 my $ts = TimeSeries->new(output_format => $output_format);
 $ts->{keeptempfiles} = 1 if $keeptempfiles;
+$ts->legend_position($legend_position);
 while (<>) {
     chomp;
     my @legend = split($sep);