[cgiapp] CGI::App, CGI::Session and CGI::Simple

[Ron Savage <suppressed>]

Hi Folks

Normally your app using CGI::Session would look like:

#!/usr/bin/perl
use DBIx::Admin::Application;
DBIx::Admin::Application -> new() -> run();

However, if your try:
#!/usr/bin/perl
use CGI::Simple;
use DBIx::Admin::Application;
DBIx::Admin::Application -> new(QUERY => CGI::Simple -> new() ) -> 
run();

you'll find it does not work. This is due to a bug in CGI::Session.
V 3.94 has this on line 168:
	if ( $arg->isa('CGI') ) {...
which means only a CGI-derived object can be used.
To use CGI::Simple you could - but shouldn't - try:
        if ( $arg->isa('CGI') || $arg->isa('CGI::Simple') ) {...
Obviously it's ridiculous to list all possible class names here. The 
real solution is to use something like:
		if ($arg -> can('cookie') ){ call cookie }
		elsif ($arg -> can('param') ){ call param }
I have logged a bug report via rt.cpan.org on this matter.
-- 
Ron Savage, suppressed on 27/04/2004. Room EF 312
Deakin University, 221 Burwood Highway, Burwood, VIC 3125, Australia
Phone: +61-3-9251 7067, Fax: +61-3-9251 7604
http://www.deakin.edu.au/~rsav



---------------------------------------------------------------------
Web Archive:  http://www.mail-archive.com/suppressed/
              http://marc.theaimsgroup.com/?l=cgiapp&r=1&w=2
To unsubscribe, e-mail: suppressed
For additional commands, e-mail: suppressed