http://qs321.pair.com?node_id=11135295


in reply to Re: How do I import a global variable form a package with require?
in thread How do I import a global variable form a package with require?

Ah, yes, I remember that. However, what if I want to only import $var at runtime? Am I just stuck fully qualifiying it with A::var? And I still don't get why sub1 imports just fine with require and $var doesn't.

$PM = "Perl Monk's";
$MCF = "Most Clueless Friar Abbot Bishop Pontiff Deacon Curate Priest Vicar";
$nysus = $PM . ' ' . $MCF;
Click here if you love Perl Monks

Replies are listed 'Best First'.
Re^3: How do I import a global variable form a package with require?
by choroba (Cardinal) on Jul 22, 2021 at 14:05 UTC
    > what if I want to only import $var at runtime?

    What does it mean? If you have code that will be compiled at runtime, it works: 

    require A;
A->import('$var');
eval 'print $var; 1' or warn $@;

    [download]

    > why sub1 imports just fine with require and $var doesn't

    Strict checks that variables are declared before you use them. It doesn't check subs when it's sure it's a sub, i.e. when parentheses follow the sub name. Try using sub1 without parentheses: the compiler will only see a bareword, not a sub call, and will complain.

    Update: reworded.

    map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
[reply]
[d/l]
[select]

      OK, that helps clear things up. Thanks for your help!

      $PM = "Perl Monk's";
      $MCF = "Most Clueless Friar Abbot Bishop Pontiff Deacon Curate Priest Vicar";
      $nysus = $PM . ' ' . $MCF;
      Click here if you love Perl Monks

[reply]
[reply]
A reply falls below the community's threshold of quality. You may see it by logging in.

In Section Seekers of Perl Wisdom