hjp
/
timeseries
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add --legend-position to tsplot

This commit is contained in:
Peter J. Holzer 2020-02-16 10:51:30 +01:00
parent cdd9f6fdd8
commit b574ed25cc
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tsplot
View File

@ -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);