Black Perl

    import calendar as usual
    StandardError is usual \
    or not usual. month is long
    
    try: not coerce
    finally: quit
    
    (help for me in range
    (usual. MONDAY))

http://www.ioccc.org/1990/westley.c

(HN discussion: https://news.ycombinator.com/item?id=375945)

The job I want:

    $dollars++ while sleep(1);

    {
        work();
        redo;
        get_rich();
    }

  def unfalse_poem():
      (None is True) and False
      for subject in [complex(True,False)]:
          subject is not object
          for certainty in [complex(False,True)]:
              certainty is not Exception
              certainty is not license
              subject and certainty
              reduce and coerce
              coerce and reduce
              while certainty.real: unexamined
      for certainty in [complex(False,True)]:
          return certainty is not certainty.real is not certainty

From http://forums.penny-arcade.com/discussion/39142/inform-7-pro...:

    Will's Study is a room. The desk is here.
    A hastily handwritten note is on it.
    Description is "It's from your friend Shakespeare:
    'I've gone to lunch. You'll have to write the sonnet.'"
    Composing is an action applying to nothing.
    The quill is a thing that is in the study.
    Understand "write sonnet" as composing.
    Description of the quill is "Old and cruddy".
    Instead of composing when the player
    has no quill, say "You have not got the quill."
    Instead of composing, say "And... done. 'Heya',
    says Will, returning. You say, 'Hello, Will!'
    Says Shakespeare, 'Thank you for the time you've taken!
    You really are a pal, Sir Francis Bacon.'"

The only thing I'd seen like this before was "Sunrise, Sunset" written in PHP. I know these things aren't new for many of you but I keep being surprised by the creativity I find.

    kill them, dump qualms, shift moralities,
    values aside, each one;
    die sheep! die to reverse the system
    you accept (reject, respect);