Assignment and use statement in the same BEGIN block

perlancar has asked for the wisdom of the Perl Monks concerning the following question:

I'm wondering if other monks have been bitten by this. FYI, Acme::PERLANCAR::DumpImportArgs is just a supersimple module to dump its import() arguments.

% perl -wE'BEGIN { $vars{k} = "v1"; use Acme::PERLANCAR::DumpImportArgs %vars }'
Import arguments: "Acme::PERLANCAR::DumpImportArgs"

% perl -wE'BEGIN { $vars{k} = "v1" } use Acme::PERLANCAR::DumpImportArgs %vars;'
Import arguments: ("Acme::PERLANCAR::DumpImportArgs", "k", "v1")

No warnings.

Also, I wanted %vars to be lexical.

Back to Seekers of Perl Wisdom