More of a curiosity than a real obfuscation. Employs the rarely used Slashdot variable in the last line. ;-)
open Japh,">Just_Another_Perl_Hacker.xls" and binmode Japh; $/ = pack "C2v2V2VdC2V2v", 9,8,8,5,16,0,10,0,4,2,32,0,24; $\ = pack "V", +1 +1 +1 +1 +1 +1 +1 +1 +1 +1; print Japh $/. 'Just Another Perl Hacker';




Update: This creates an Excel binary JAPH.

This will work on Unix but you will have to view the output in Excel. Gnumeric and OpenOffice can't read this because it exploits a backwards compatibilty loop-hole in Excel.

John.
--

Replies are listed 'Best First'.
Re: The Man who Japhed.
by damian1301 (Curate) on Apr 13, 2001 at 04:01 UTC
    You might ruffle some feathers because you're not closing that filehandle! When you open the door, close it!  close Japh; :) :)

    Almost a Perl hacker.
    Dave AKA damian

    I encourage you to email me

      You might ruffle some feathers because you're not closing that filehandle! When you open the door, close it!

      This is a JAPH after all and that door has a fairly strong spring behind it. ;-)

      If there are any feathers ruffled it should be by: open foo *and* bar.

      John.
      --