Help for this page

Select Code to Download

Select or download this

my $verbosity = 0;
GetOptions( 'verbose+' => \$verbosity, );
...
}

report( 2, "reached ".__FILE__.":".__LINE__."\n" );