Help for this page

Select Code to Download

Select or download this

sub verb { 1 }
my $x = 1;
print "debug ".$x++."\n" if verb;