Discussion List day-by-day inspires me.

[monsieur_champs]

Of course if you have been on a discussion list for more than a few minutes, for sure you saw things like this:

  #!perl # Emacs, this is -*- perl -*-
  use warnings;
  use strict;
  use Person::Stub;
  use ACME;
  use ACME::Catalog;

  my $me = new Person::Stub( 'Luis' );
  my $nilson = new Person::Stub( 'Nilson' );

  my $acme_factory = new ACME( operator => $me );
  my $fire_suit = ACME->factory->build( 
    $ACME::Catalog->{Suites}{Militar}{FireProof}{Heavy}
  );

  $me->helps( $nilson->wear( $fire_suit ) );
  __END__