Nicholas of Canberra : $bells->jingle;

my $we = new People;
my $snow = new Enviroment ( type => 'cold' );
my $sleigh = new Transport ( for => $snow );

$sleigh->puller( new Horse );
$sleigh->dash( $snow );

$we->go( $fields, 'over' );
$we->do( 'laugh' );
$bell->ring;
$spirits->set( bright => 1 );
$we->set_fun( 'lots' ) while ( 
     $we->ride and $we->sing( about => 'sleighing' );

$bells->jingle; $bells->jingle;
$bells->jingle while ( $we->travel );
$we->set_fun( 'lots' ) while ( $we->in($sleigh) );
$bells->jingle; $bells->jingle;
$bells->jingle while ( $we->travel );
$we->set_fun( 'lots' ) while ( $we->in($sleigh) );

meta