diff options
-rwxr-xr-x | bin/ekgping | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/bin/ekgping b/bin/ekgping index 65b066f..f8d13da 100755 --- a/bin/ekgping +++ b/bin/ekgping @@ -16,6 +16,7 @@ my $last_id = 0; my $beep; my $was_beep = 1; my $dead_count = 0; +my $column = 0; my $ping = harness( [ 'ping', '-n', $host ], @@ -46,6 +47,11 @@ while ( usleep(100_000) ) { $ping->pump_nb(); + if ($column++ == 80) { + print "\r"; + $column = 0; + } + if ( $id != $last_id ) { $beep = 1; print q{^}; |