Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling

Re^2: Note on usage of ours variables and a question

by likbez (Sexton)
on Nov 20, 2019 at 02:06 UTC ( #11108923=note: print w/replies, xml ) Need Help??

in reply to Re: Note on usage of ours variables and a question
in thread Note on usage of ours variables and a question

Hi Toby,

Amazing finding !

${^MYDEBUG} = 1;
This does solves that problem. So you are the first to provide a real solution. Kind of undocumented feature. Thank you very much.

But the problem is that I often forget to put :: after $ and correcting this error ( as in "$debug -> $::debug ") takes my time and if you have many modules and change debugging statements in them often it became pretty annoying because for me this error is persistent.

This is even more complex idiom and I unfortunately I am very bad with typing them. I still often type variables without sigil, especially if the same day I used C.

But in any case I did learn something new and interesting about Perl today. Thanks again.

Replies are listed 'Best First'.
Re^3: Note on usage of ours variables and a question
by AnomalousMonk (Bishop) on Nov 20, 2019 at 02:24 UTC
      Looks like one needs additional underscore:
      ${^_MYDEBUG} = 1;

      "No name that begins with ^_ will acquire a special meaning in any future version of Perl; such names may therefore be used safely in programs. $^_ itself, however, is reserved."

      "In particular, the special ${^_XYZ} variables are always taken to be in package main , regardless of any package declarations presently in scope."

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://11108923]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (3)
As of 2021-01-16 05:20 GMT
Find Nodes?
    Voting Booth?