See the current Perl documentation for CGI::Switch.

Here is our local, out-dated (pre-5.6) version:

CGI::Switch - Try more than one constructors and return the first object available

 use CGISwitch;


 use CGI::Switch This, That, CGI::XA, Foo, Bar, CGI;

 my $q = new CGI::Switch;

Per default the new() method tries to call new() in the three packages Apache::CGI, CGI::XA, and CGI. It returns the first CGI object it succeeds with.

The import method allows you to set up the default order of the modules to be tested.


perl(1), Apache(3), CGI(3), CGI::XA(3)


Andreas König <>