- printf '%.8g of ', $opt{'sum-format'}->(sum(grep { length }
- @values[$opt{hidemin} .. ($opt{hidemax} || @lines) - 1]
- ) // 0);
+ my $linemin = $opt{hidemin};
+ $linemin += @lines if $linemin < 0;
+ my $linemax = ($opt{hidemax} || @lines) - 1;
+ printf '%.8g of ', $opt{'sum-format'}->(
+ sum(grep {length} @values[$linemin .. $linemax]) // 0
+ );