my $bad; BEGIN { eval { require Foo }; if ($@) { $bad = "Foo"; warn "This requires $bad to work. " . "You can get it at ... "; } } sub new { return undef if $bad; ...etc... }
Cheers,
KM
In reply to RE: Re: help with a Perl term
by KM
in thread help with a Perl term
by zdog
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |