X-Git-Url: http://git.shiar.nl/barcat.git/blobdiff_plain/6feb4b288f8fa9711ee580fe65562abef976a842..ef0556b2123644377182a9f43a4b2a753cb571a6:/graph?ds=sidebyside diff --git a/graph b/graph index 14b7173..d317df5 100755 --- a/graph +++ b/graph @@ -31,6 +31,8 @@ if (defined $opt{follow}) { alarm $opt{follow}; } +$SIG{INT} = 'IGNORE'; # continue after assumed eof + my (@lines, @values); while (readline) { chomp; @@ -48,6 +50,8 @@ while (readline) { } @lines or exit; +$SIG{INT} = 'DEFAULT'; + sub show_lines { my @order = sort { $b <=> $a } grep { length } @values;