sub myCmp ($$) {
   $_[0]->name() cmp $_[1]->name();
}