# <input type="checkbox" name="search_first_class">
# <input type="checkbox" name="search_economy_class">

my $search_first_class   = $cgi->param('search_first_class');
my $search_economy_class = $cgi->param('search_economy_class');

warn("Classes to search:"
   . ($search_first_class   ? ' First'   : '')
   . ($search_economy_class ? ' Economy' : '')
) if $DEBUG;

##</code><code>##

# <input type="checkbox" name="search_class" value="first">
# <input type="checkbox" name="search_class" value="economy">

# Call $cgi->param in a list context.
my @search_classes = $cgi->param('search_class');

warn("Classes to search: " . join(' ', @search_classes))
   if $DEBUG;

# # The array can be converted to a hash for easy to lookup.
# my %search_classes;
# @search_classes{@search_classes} = @search_classes;
#
# warn("Classes to search:"
#    . ($search_class{'first'  } ? ' First'   : '')
#    . ($search_class{'economy'} ? ' Economy' : '')
# ) if $DEBUG;