You need more methods to implement important functionality!

Log->rolldown($stairs, { pairs => false } );
Log->rollover( Neighbour->dog() );
Log->compress(size=> $back);
Log->set_snackable(true);
Log->set_attributes ( big=>true, heavy=>true, wood=>true);
assert( $Log->virtues > $bad && $Log->virtues == GOOD );
Log->set_target_market( $everyone)
sub get { return new Log }
[download]

You may have to work out the copyrights from Blammo, Inc., however. :-)