Hi, all
I am getting this error when trying to update record:
Can't update ...: Not an array reference (Date::Simple=SCALAR 0x8fcb8f0))
at /usr/local/lib/perl5/site_perl/5.6.1/DBIx/ContextualFetch.pm line 51,
<GEN4> line 3.\n at
/usr/local/lib/perl5/site_perl/5.6.1/Class/DBI/FromCGI.pm line 233\n
I was looking at DBIx/ContextualFetch.pm and it seems to me there is some
problem with untaint, but I can not figure out what. CGI::Untaint and
CGI::Untaint::date are there, it is running on PostgreSQL and Apache 1.3
with mod_perl.
Here is my table:
CREATE TABLE public.supcode
(
id serial NOT NULL,
name char(50) NOT NULL,
memo varchar(200),
ddate date,
CONSTRAINT supcode_pkey PRIMARY KEY (id)
) WITH OIDS;
and package:
package Vds::Supcode;
use strict;
Vds::Supcode->untaint_columns(
printable => [qw/name memo/],
date => [qw/ddate/]
);
sub display_columns { qw(name memo ddate) }
1;
Any help appreciated,
Veljko
_______________________________________________
maypole mailing list
maypole at lists.netthink.co.uk
http://lists.netthink.co.uk/listinfo/maypole
This archive was generated by hypermail 2.1.3 : Thu Feb 24 2005 - 22:25:56 GMT