Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

A feature of use

by ambrus (Abbot)
on Aug 19, 2008 at 19:57 UTC ( #705321=obfuscated: print w/replies, xml ) Need Help??

Look at the following snippet.

perl -e 'open strict, ">&", STDOUT or die; use strict; print strict fo +obar, "\n";'

This prints foobar so clearly foobar is interpretted as a bareword. However, we use strict, so that should disallow barewords. Why is this? (The title of the post can give a hint.)

Replies are listed 'Best First'.
Re: A feature of use
by ambrus (Abbot) on Aug 20, 2008 at 19:57 UTC

    In fact, even this works.

    perl -e 'if (0) { open strict; } use strict; print STDOUT foobar, "\n" +;'
Re: A feature of use
by jdalbec (Deacon) on Aug 20, 2008 at 22:45 UTC
Re: A feature of use
by ambrus (Abbot) on Jul 18, 2016 at 09:34 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://705321]
Approved by Joost
Front-paged by Corion
help
Chatterbox?
[Lady_Aleena]: Module is currently 104 lines but will shirnk to 63. The script using the module is currently 40 lines but will grow to 82, 180 to 146 lines total. (This is after rewrting the data files.)

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (5)
As of 2017-05-29 03:07 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?