Error message

        sub AUTOLOAD {
          …
    
          warn "Unknown method '$method' called on object of class $bottom_class\n";
          warn "Perhaps try:\n";
          for my $name (sort keys %known_method) {
            warn "  $name " . 
              ($known_method{$name} eq $bottom_class 
               ? ""
               : "(via $known_method{$name})") .
                "\n";
          }
    
          croak "Aborting";
        }

☞

☞