bbfan has asked for the wisdom of the Perl Monks concerning the following question:
Hi Monks,
This one escapes me:
#!/usr/bin/perl use strict; my $debug=1; if ($debug > 0) { use warnings; print "Using warnings\n"; } run_sub(); sub run_sub { print "Running\n"; } sub run_sub { print "Ran\n"; }
Am expecting a warning...? Thanks for considering.
~
Back to
Seekers of Perl Wisdom