use vars qw($request %Args);
$request = HAS_MODPERL ? Apache->request : new CGI;
%Args    = HAS_MODPERL ? $request->args : $request->Vars;