From a8b7cda64f8ae4f1f003b79b999654d8c246da41 Mon Sep 17 00:00:00 2001
From: Robert Martin-Legene <robert@nic.ar>
Date: Thu, 26 Jul 2018 17:58:21 -0300
Subject: [PATCH] option -v for walker.pl

---
 bin/walker.pl | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/bin/walker.pl b/bin/walker.pl
index 95c6f85..0cf06ee 100755
--- a/bin/walker.pl
+++ b/bin/walker.pl
@@ -5,7 +5,8 @@ use warnings;
 use IO::File;
 use Math::BigInt;
 use Carp;
-$Carp::Verbose = 1;
+$Carp::Verbose  =   1;
+my  $verbose    =   0;
 
 die "\$BFAHOME not set. Did you source bfa/bin/env ?\n"
   unless exists $ENV{BFAHOME};
@@ -332,6 +333,12 @@ my $nonce_xlate = {
     '0xffffffffffffffff' => 'SEALER_ADD',
 };
 
+while ( $ARGV[0] =~ m/^-/ )
+{
+    my $arg     =   shift;
+    $verbose    =   1   if $arg eq '-v';
+}
+
 $| = 1;
 mkdir 'cache';
 my $number  =   shift || tools::cat 'walker.block.last' || 'earliest';
@@ -374,4 +381,5 @@ while ( 1 )
     printf "\r%s%c[J", $txt, 27 if $txt ne '';
 #$block->signature;
     $number     =   $block->number + 1;
+    print "\n" if $verbose;
 }
-- 
GitLab