--- "A. Pagaltzis" <[EMAIL PROTECTED]> wrote:
> * Eric Wilhelm <[EMAIL PROTECTED]> [2007-10-09 01:55]:
> > This changes the require() on Foo::Report and Foo::Customer to
> > run-time though, right?
>
> use Devel::BeginLift qw( require );
Cute trick, but I wondered if that would globally break require.
#!/usr/bin/perl -l
use strict;
use warnings;
use Devel::BeginLift qw(require);
require Data::Dumper;
BEGIN {
no warnings 'once';
print $Data::Dumper::Indent;
}
Seems to have no impact on require at all. I suspect that's because
it's not a subroutine.
Cheers,
Ovid
--
Buy the book - http://www.oreilly.com/catalog/perlhks/
Perl and CGI - http://users.easystreet.com/ovid/cgi_course/
Personal blog - http://publius-ovidius.livejournal.com/
Tech blog - http://use.perl.org/~Ovid/journal/
