Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

comment on

( [id://3333]=superdoc: print w/replies, xml ) Need Help??
If you check in perlvar you will find out that $^H is an internal and highly magical variable. It is just a collection of flags with rather special scoping semantics. What strict does is flip the appropriate bits to what they need to be to cause certain things to (not) be checked when you want them to (not) be.

If it helps, I am willing to treat it as black magic and hope that the phase of the moon is right... :-)

UPDATE
What I suspect (verifying it would take some research) is happening is that $^H is a global variable which the parser is auto-localizing as it goes through blocks. So within strict you write to the global, but within the parser the effect of that modification is scoped to just the current block. Therefore the part of the user code that is affected is apparently lexically scoped.

A couple of other pieces of magic though. First of all when you see an eval, Perl remembers what the correct value of $^H needs to be when it is called. Secondly within a file it needs to essentially do local $^H = $^H; while when it goes out and compiles another file it would have to do local $^H = 0;.

So the magic isn't all that magic, it just looks mysterious because of when it is happening. If you want to test this explanation, each of the following tests another aspect of its behaviour:

perl -e 'print $^H' perl -e 'use strict; print $^H' perl -e 'use strict; no strict; print $^H' perl -e 'use strict; {no strict; print $^H}' perl -e 'use strict; BEGIN {no strict; print $^H}' perl -e 'use strict; {no strict; BEGIN{ print $^H}}'
(People on windows may need to switch quotes.)

In reply to Re (tilly) 1: How does strict work? by tilly
in thread How does strict work? by epoptai

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":



  • Are you posting in the right place? Check out Where do I post X? to know for sure.
  • Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
    <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
  • Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
  • Want more info? How to link or How to display code and escape characters are good places to start.
Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others cooling their heels in the Monastery: (3)
As of 2024-04-25 21:42 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found