diff options
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/ekgping | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/bin/ekgping b/bin/ekgping index e8e7e79..47b1c8c 100755 --- a/bin/ekgping +++ b/bin/ekgping @@ -74,13 +74,15 @@ while ( usleep(100_000) ) { $ping->pump_nb(); - if ( $column++ == $column_max ) { + $column++; + + if ( $column == $column_max ) { print "\r"; $column = 0; } if ( $column != $column_max ) { - print "\e[1C \e[1D\e[1D"; + print "\e[1C \e[2D"; } if ( $id != $last_id ) { @@ -101,7 +103,7 @@ while ( usleep(100_000) ) { $beep = 1; } - print '_'; + print q{_}; } STDOUT->flush(); |