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

JAPH Golf: 32

print "Just Another Perl Hacker"

Admittedly, not very obfuscated ...


The intelligent reader will judge for himself. Without examining the facts fully and fairly, there is no way of knowing whether vox populi is really vox dei, or merely vox asinorum. -- Cyrus H. Gordon


Comment on Re^2: Infinite JAPHs?
Download Code
Re^3: Infinite JAPHs?
by domm (Chaplain) on Mar 31, 2005 at 07:52 UTC

    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$_.$/}

      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$_.$/}
Re^3: Infinite JAPHs?
by cog (Parson) on Mar 31, 2005 at 08:52 UTC
    That's not a JAPH... the "A" and the "H" should be lowercased, and there's a comma or a newline (you get to choose which) missing from the end...

    Anyway, you could have ommited the space after the print... :-)

      Good, I'm glad someone pointed that out. The canonical JAPH (as used by JAPH #0, namely me) produces precisely the string:
      "Just another Perl hacker,"
      The comma comes from the fact that it was a sign-off at the end of my Usenet postings:
      blah blah blah

      blah blah

      print "Just another Perl hacker,"

      (my normal dot-sig here)

      -- Randal L. Schwartz, Perl hacker
      Be sure to read my standard disclaimer if this is a reply.