do { 
   $_ = <INFO>; 
   return %header if /^\037/ || ! defined $_ 
} until /^\* Menu:/ ;