sub teach {
   (shift->teacher or die)->teach(@_);
}