sub process_query { $period = $query->param('period') || (keys %all_quotas)[0]; print_table; }