diff --git a/bin/walker.pl b/bin/walker.pl index 95c6f8566e6253f470afef5053ef131aaa721c0a..0cf06eebaceb9e720d25ea164727609622f3b15e 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; }