use CGI::Fast qw( :standard );

while (my $q = new CGI::Fast) {
    process_request($q);
}