From 16256d269dab640ae3d7e74e5e6a6de3d154c11f Mon Sep 17 00:00:00 2001 From: Mischa POSLAWSKY Date: Fri, 6 Sep 2019 23:33:26 +0200 Subject: [PATCH] rename follow option to --interval or -t Initially copied f(ollow) from tail, but that letter will be better suited for field selection, and the function is only similar. Alternatives include -s (closer equivalent to tail, also in free --seconds), -i as in ping --interval (best match, but should be reserved for interactive or ignore-case), -n like watch --interval, and -v as verbose interpretation. Settle on -t for best mnemonics; common for time(out) and found in preferred longhand of inTerval. --- graph | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/graph b/graph index 8bf473d..41d858a 100755 --- a/graph +++ b/graph @@ -16,7 +16,7 @@ sub podexit { my %opt; GetOptions(\%opt, 'color|c!', - 'follow|f:i', + 'interval|t:i', 'trim|length|l=s' => sub { my ($optname, $optval) = @_; $optval =~ s/%$// and $opt{trimpct}++; @@ -37,13 +37,13 @@ $opt{width} ||= $ENV{COLUMNS} || 80; $opt{color} //= -t *STDOUT; # enable on tty $opt{trim} *= $opt{width} / 100 if $opt{trimpct}; -if (defined $opt{follow}) { - $opt{follow} ||= 1; +if (defined $opt{interval}) { + $opt{interval} ||= 1; $SIG{ALRM} = sub { show_lines(); - alarm $opt{follow}; + alarm $opt{interval}; }; - alarm $opt{follow}; + alarm $opt{interval}; } $SIG{INT} = 'IGNORE'; # continue after assumed eof @@ -149,9 +149,9 @@ Force colored output of values and bar markers. Defaults on if output is a tty, disabled otherwise such as when piped or redirected. -=item -f, --follow[=] +=item -t, --interval[=] -Interval to output partial progress. +Interval time to output partial progress. =item -l, --length=[-][%] @@ -270,7 +270,7 @@ Or the most frequent authors: Latency history: ping google.com | - perl -pe '$|=1; print s/ time=(.*)// ? "$1 for " : "> "' | graph -f + perl -pe '$|=1; print s/ time=(.*)// ? "$1 for " : "> "' | graph -t =head1 AUTHOR -- 2.30.0