use Perl

• 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) <rgarciasuarezNO@SPAMgmail.com> 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) <rgarciasuarezNO@SPAMgmail.com> 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