Wouldn't overriding CGI::Application's cgiapp_get_query method be cleaner?

untested:

sub cgiapp_get_query {
  my $self = shift;

  # Include CGI.pm and related modules
  require CGI;

  $CGI::POST_MAX=102400;
  $CGI::DISABLE_UPLOADS=0;

  # Get the query object
  my $q = CGI->new();

  return $q;
}
[download]