Is this fundamentally different than my original try?

Thanks Tye! Applying this to "use bytes," am I correct that your solution is basically the same approach as the one I originally suggested? In other words, isn't this...

BEGIN {
    if(  eval { require bytes }  ) {
        bytes->import();
    }
}
[download]

...pretty much the same as this:

BEGIN {
eval {require bytes; import bytes; 1}
}
[download]

I'm a bit new to trying to import modules and pragmas outside of the regular "use" function, so I'm just trying to be sure that I understand the difference, if any.

Thanks! Josh

Comment on Is this fundamentally different than my original try? Select or Download Code

Replies are listed 'Best First'.
Re^4: use bytes without breaking perl 5.005 or 5.004? (same) by tye (Sage) on Sep 29, 2003 at 03:56 UTC
Yes, same result. Here is how I tested it: `> perl { use warnings; } print $x; <EOF> > perl BEGIN { if( {require warnings} ) { warnings->import(); } } print $x; <EOF> Use of uninitialized value in print at - line 3. > perl BEGIN { eval { require warnings; import warnings; } } print $x; <EOF> Use of uninitialized value in print at - line 3. >` [download] First is the "control" case to show that 'use warnings' inside of a block doesn't have an effect outside of the block. Next is my method, and the warning generated shows that there is an effect (since I have warnings.pm in this version of Perl). Last is your method, which also works. The 'hint' pragmas all work very much the same so this trick works for 'strict', 'warnings', 'bytes', etc. - tye	[reply] [d/l]

Replies are listed 'Best First'.

Re^4: use bytes without breaking perl 5.005 or 5.004? (same)
by tye (Sage) on Sep 29, 2003 at 03:56 UTC

Yes, same result. Here is how I tested it:

 > perl
{ use warnings; }
print $x;
<EOF>

 > perl
BEGIN { if( {require warnings} ) { warnings->import(); } }
print $x;
<EOF>
Use of uninitialized value in print at - line 3.

 > perl
BEGIN { eval { require warnings; import warnings; } }
print $x;
<EOF>
Use of uninitialized value in print at - line 3.

 >
[download]

The 'hint' pragmas all work very much the same so this trick works for 'strict', 'warnings', 'bytes', etc.

tye

[reply]
[d/l]