my %general = (

    data => sub { info(
            who=> $q->param('who') || '',
                why=> $q->param('why') || '',
                   )
            },

   results => [ sub { names(
                       first => $q->param('first'),
                       zip   => $q->param('zip'),
                   )
                },
                sub { info(
                       who => $q->param('who') || '',
                       why => $q->param('why') || '',
                   )
                },
              ]

 );