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

Use postderef instead of autoderef

This commit is contained in:
Peter J. Holzer 2017-12-14 03:28:46 +01:00
parent e86f51be2f
commit 98ea159ff7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tsplotv
View File

@ -77,7 +77,7 @@ my $ns = 0;
my %data; my %data;
$config->{timeseries} //= {}; $config->{timeseries} //= {};
for (keys $config->{timeseries}) { for (keys $config->{timeseries}->%*) {
$ns = $config->{timeseries}{$_}{order} if ($config->{timeseries}{$_}{order} // 0) > $ns; $ns = $config->{timeseries}{$_}{order} if ($config->{timeseries}{$_}{order} // 0) > $ns;
} }
@ -88,7 +88,7 @@ while (<>) {
$data{$timestamp}{$series} = $value; $data{$timestamp}{$series} = $value;
} }
my @series = sort { $config->{timeseries}{$a}{order} <=> $config->{timeseries}{$b}{order} } my @series = sort { $config->{timeseries}{$a}{order} <=> $config->{timeseries}{$b}{order} }
keys $config->{timeseries}; keys $config->{timeseries}->%*;
if ($colors) { if ($colors) {
my @colors = split(/,/, $colors); my @colors = split(/,/, $colors);
while (my ($i, $c) = each(@colors)) { while (my ($i, $c) = each(@colors)) {