Re: strict refs

[Krambambuli]

in reply to strict refs

The following works for me:

foreach (@{ $DBI::EXPORT_TAGS{sql_types} }) {
  my $ref = \&{"DBI::$_"};
  printf "%s=%d\n", $_, &$ref;
}

It is documented in strict:

There is one exception to this rule:

                 $bar = \&{’foo’};
                 &$bar;

             is allowed so that "goto &$AUTOLOAD" would not break unde
+r stricture.

Hth,

[LesleyB]

Yes, Krambabuli, it does help and it does work for me too.

Thank you for pointing out the documentation on it