git.shiar.nl
/
barcat.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
0276d9e
)
TODO: header option
author
Mischa POSLAWSKY
<perl@shiar.org>
Wed, 18 Sep 2019 21:17:07 +0000
(23:17 +0200)
committer
Mischa POSLAWSKY
<perl@shiar.org>
Thu, 19 Sep 2019 12:37:54 +0000
(14:37 +0200)
barcat
patch
|
blob
|
history
diff --git
a/barcat
b/barcat
index 7da22597daea388d539e81b883f56de60bfac278..05b7cb182eada1d57ea6cd2d64e729796eba4de7 100755
(executable)
--- a/
barcat
+++ b/
barcat
@@
-42,6
+42,7
@@
GetOptions(\%opt,
" (range expected)\n"
);
},
+ 'header!',
'markers|m=s',
'graph-format=s' => sub {
$opt{'graph-format'} = substr $_[1], 0, 1;
@@
-192,6
+193,8
@@
sub sival {
);
}
+say sprintf ' %*s-+%*s-+', $len, $minval, $size * ($maxval - $minval) - 3, $maxval if $opt{header};
+
while ($nr <= $#lines) {
$nr >= $opt{hidemax} and last if defined $opt{hidemax};
my $val = $values[$nr];