http://www.perlmonks.org?node_id=443716


in reply to Re^2: Infinite JAPHs?
in thread Infinite JAPHs?

31!

die"Just Another Perl Hacker\n"

Ok, in fact thats the same length (minus the space), but it has more 'features' (ends with a newline) :-)

-- #!/usr/bin/perl for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}

Replies are listed 'Best First'.
Re^4: Infinite JAPHs?
by kelan (Deacon) on Mar 31, 2005 at 20:34 UTC

    Get one less character with all of the same features!

    die"Just another Perl hacker "
    Just embed an actual newline into the string :) And actually, I think the usual rules don't count physical newlines, so you might see it as saving two characters.

      Nice!
      -- #!/usr/bin/perl for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}