sub new {
  die "this is an abstract subclass" if $_[0] eq __PACKAGE__;
  shift->SUPER::new(@_);
}