On Mon, 03 May 2004 08:05:31 -0400, Cees Hek wrote:
Hi Cees
Taste and try before you buy!
http://savage.net.au/CGI.pm-3.05.patch.tgz
A new version incorporating your suggestion has been uploaded to this
URI.
--
Ron Savage, [EMAIL PROTECTED] on 5/05/2004. Room EF 312
Deakin University, 221
On Tue, 27 Apr 2004 00:27:53 -0400, Cees Hek wrote:
Hi Cees
What probably should be done is to ask the CGI.pm maintainer to
include
a custom 'can' method that is able to specify what functions are
available in the module.
Lincoln Stein says he's too busy at the moment (surprise!) and has
Try this:
#!/usr/bin/perl
use strict;
use warnings;
use CGI;
# --
my(%method);
for my $tag (keys %CGI::EXPORT_TAGS)
{
$method{$_} = 1 for grep{! /^:/} (@{$CGI::EXPORT_TAGS{$tag} });
}
print $_. \n for (sort keys %method);
--
Ron Savage, [EMAIL PROTECTED] on 3/05/2004. Room EF
Ron Savage wrote:
Lincoln Stein says he's too busy at the moment (surprise!) and has
asked me to whip up a can() method. I'll do that now.
Cool! Thanks for following up on this Ron.
If you have any suggestions, post them to this list (I'm subscribed).
Here is a first stab at a solution. I
On Tue, 27 Apr 2004 00:27:53 -0400, Cees Hek wrote:
Hi Cees
Taste and try before you buy!
http://savage.net.au/CGI.pm-3.05.patch.tgz
--
Ron Savage, [EMAIL PROTECTED] on 3/05/2004. Room EF 312
Deakin University, 221 Burwood Highway, Burwood, VIC 3125, Australia
Phone: +61-3-9251 7067, Fax:
Ron Savage wrote:
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