From 909ee3f62040b55306e19d20cd3438aefbca1c29 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 2 Jun 2011 13:50:31 +0200 Subject: Hide cursor --- bin/ekgping | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) (limited to 'bin/ekgping') diff --git a/bin/ekgping b/bin/ekgping index f8d13da..aca2c3f 100755 --- a/bin/ekgping +++ b/bin/ekgping @@ -24,6 +24,9 @@ my $ping = harness( '>&' => \&parse_ping_output, ); +local $SIG{TERM} = \&quit; +local $SIG{INT} = \&quit; + sub parse_ping_output { my ($line) = @_; @@ -38,16 +41,24 @@ sub parse_ping_output { return; } +sub quit { + $ping->kill_kill( grace => 1 ); + print "\e[?25h"; + exit 0; +} + $ping->start(); # Ignore first line $ping->pump(); +print "\e[?25l"; + while ( usleep(100_000) ) { $ping->pump_nb(); - if ($column++ == 80) { + if ( $column++ == 80 ) { print "\r"; $column = 0; } -- cgit v1.2.3