From 608a930b5751b79cc86d4318f67ebfaacb5f3ce7 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Thu, 2 Jun 2011 13:42:54 +0200
Subject: Rewrite line every 80 chars

---
 bin/ekgping | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'bin/ekgping')

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{^};
-- 
cgit v1.2.3