package class_discard; # $Id: class_discard.pm,v 1.1.1.1 2003/06/06 09:53:06 rider Exp $ use log; sub new { bless {}, "class_discard" } sub AUTOLOAD { log::l("class_discard: $AUTOLOAD called at ", caller); } 1;