use vars qw($AUTOLOAD);
sub AUTOLOAD {
  print "Die Subroutine $AUTOLOAD konnte nicht geladen werden\n";
} # AUTOLOAD