Stories
Slash Boxes
Comments

NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

use Perl

All the Perl that's Practical to Extract and Report

use Perl Log In

[ Create a new account ]

pudge (1)

pudge
(email not shown publicly)
http://pudge.net/
AOL IM: Crimethnk (Add Buddy, Send Message)

I run this joint, see?

Journal of pudge (1)

Monday June 30, 2003

03:15 PM

Perl Idioms From Beyond

[ #13159 ]

You may or may not know about this little (hopefully largely unused) idiom:

perl -le '$FILE = ".bashrc"; open(FILE); print <FILE>'

Since we don't use global variables anymore (right?), this is no longer useful. But wouldn't it be cool if that could work with lexicals? I offer no solution. Just the thought.

List all Journal entries

Perl Idioms From Beyond More | Login | Reply

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.

Without JavaScript enabled, you might want to use the classic discussion system instead. If you login, you can remember this preference.

one-arg open() (Score:3, Interesting)

by vsergu (505) on 2003.06.30 15:35 (#21587) Journal

The special case open 0 has been sighted in programs that print themselves.

Reply to This
*0 (Score:4, Informative)

by rafael (2125) <reversethis-{moc ... {zerausaicragr}> on 2003.06.30 15:36 (#21588) Homepage Journal

That's most useful with $0, to write quines :
open 0;print<0>
But if you want to start some interesting discussion, you should post this on P5P.

Reply to This
- Re:*0 (Score:2)
  
  by pudge (1)
  
  Yes, but that is the same old global.
  
  And what, interesting discussions don't happen on use Perl? :-) I don't want this to be taken too seriously so don't want to contribute to p5p noise.
  - Re:*0 (Score:4, Funny)
    
    by rafael (2125) <reversethis-{moc ... {zerausaicragr}> on 2003.06.30 15:49 (#21593) Homepage Journal
    
    I didn't say "interesting", I said "<i>interesting</i>". With an "i" like in "irony".
    
    Reply to This
    
    Parent
    - Re:*0 (Score:3, Funny)
      
      by jamiemccarthy (664)
      
      So that's why my films keep ending up with snarky and cynical subtexts: I'm using iMovie.
An Ugly Lexicalish Solution (Score:3, Interesting)

by chromatic (983) on 2003.06.30 16:08 (#21597) Homepage Journal

Here's one shot at it:
perl -e 'my $file = ".bashrc"; open( *FILE = \$file ); print <FILE>'
It even works with strict and warnings. It doesn't work with the flags -ew, though, which should tell you something. (-we works.)

Reply to This