Re: strict refs

I can fix this by not using use strict; but I'd rather not.

This sounds to me that you're using "use strict" because someone convinced you it was a good idea, but you don't really know what's for.

Many people have the impression that "use strict" prevents you from writing bad code. Or preventing you to use certain "bad" constructs. That's not true. "use strict" disallows certain interpretations of code; it prevents perl to interpret your code in a certain way when that way could easily be a mistake. In your case, the use of &{"DBI::$_"} as a symbolic reference intended - so you can tell Perl that you intend it this way by disabling 'use strict "refs"' for the block:

foreach (@{ $DBI::EXPORT_TAGS{sql_types} }) {
  no strict "refs";
  printf "%s=%d\n", $_, &{"DBI::$_"};
}
[download]

There's nothing wrong with that.

Comment on Re: strict refs Select or Download Code

Replies are listed 'Best First'.
Re^2: strict refs by SuicideJunkie (Vicar) on Oct 28, 2008 at 14:01 UTC
Another way to think of it is like that yellow striped safety glass over top of big red buttons. Occasionally you really do want to launch the nukes... Just don't leave the cover flipped open longer than necessary, and it can continue to help to prevent accidents with disastrous consequences (like executing unknown code).	[reply]
Re^3: strict refs by LesleyB (Friar) on Oct 28, 2008 at 15:36 UTC
Well, I am having a strict refs kind of day at the moment - now with the Captcha::reCAPTCHA module check_answer method. As it is entwined in CGI::FormBuilder and Template I guess I only have myself to blame.	[reply]
Re^2: strict refs by LesleyB (Friar) on Oct 28, 2008 at 15:31 UTC
I `use strict;` because it helps me avoid writing poor or ambiguous code. While no-one else has persuaded me to `use strict;`, the general consensus of opinion, even in the DBI docs, is `To use DBI, first you need to load the DBI module: use DBI; use strict; (The use strict; isn't required but is strongly recommended.)` [download] What I lack at the moment is the knowledge when (and sometimes how) to safely switch it off.	[reply] [d/l] [select]
Re^3: strict refs by Narveson (Chaplain) on Oct 28, 2008 at 17:19 UTC
Strictures are lexically scoped, so if you turn them off in a small block, you are pretty safe. This particular example happens in a small `foreach` loop, so there's your block. If you're in the middle of a longer sequence, you can say `do_stuff(); { no strict 'refs'; printf "%s=%d\n", $_, &{"DBI::$_"}; } do_more_stuff();` [download]	[reply] [d/l] [select]