path: root/perl-install/class_discard.pm

package class_discard; # $Id$

use log;

sub new { bless {}, "class_discard" }

sub AUTOLOAD {
    log::l("class_discard: $AUTOLOAD called at ", caller, ", params ", join(', ', @_));
}

1;