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, [EMAIL PROTECTED] 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/[EMAIL PROTECTED]/
http://marc.theaimsgroup.com/?l=cgiapp&r=1&w=2
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
