Things popping up from my thought pool:
@EXPORT_FAIL = qw(verbose); # hook to enable verbose mode # if the caller specifies verbose usage #("perl -MCarp=verbose script.pl") # then the following method will be called # by the Exporter which knows # to do this thanks to @EXPORT_FAIL, above. #$_[1] will contain the word # 'verbose'. sub export_fail { shift; $Verbose = shift if $_[0] eq 'verbose'; return @_; }
In reply to Re: Setting Globals in a Base Class
by alien_life_form
in thread Setting Globals in a Base Class
by Ovid
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |