in reply to (Golf) Segfault Perl

unpack"p",$^X

But if I save it to a file called "puke": unpack$0,$0

        - tye (but my friends call me "Tye")

Replies are listed 'Best First'.
Re: (tye)Re: (Golf) Segfault Perl
by the_slycer (Chaplain) on Apr 03, 2002 at 23:30 UTC
    Drop the quotes to save another character.
    unpack p,$~
    Works on my linux box and my windows machine.
Re: (tye)Re: (Golf) Segfault Perl
by Chmrr (Vicar) on Apr 03, 2002 at 22:49 UTC

    Using $~ instead of $^X makes it one character shorter.

    perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'