(sort {
  short_sorts($master_list{$a}{members},$master_list{$b}{members},'nd') ||
  short_sorts($a,$b,'ia')
} keys %master_list)