[ic] Filter not working after Perl reinstall

Bill Carr bill at bottlenose-wine.com
Tue Aug 30 17:27:03 UTC 2011


After apt-get replaced my non-threaded perl on my Debian box I reinstalled perl and I'm now getting the following error:

Safe: Undefined subroutine &Vend::Interpolate::UnixDate called at (tag 'cgi') line 9

Below is my Filter which references UnixDate

CodeDef date_mysql Filter
CodeDef date_mysql Version $Id$
CodeDef date_mysql Description Format values from date_time widget for MySQL
CodeDef date_mysql Routine <<EOR
sub {
    use Date::Manip;
	my $in = shift;

    $in =~ s/[^\w\d\/\-,: ]//sg; # Remove mystery characters

	my $out = '';
	$out = (join '-', $3, $1, $2) if $in =~ m{^(\d{1,2})/(\d{1,2})/(\d{4})$};
	$out ||= UnixDate($in,"%Y-%m-%d %H:%M:%S");

    return $out;
}
EOR

Using UnixDate in a script outside of Interchange works fine.

How can I fix this?
 
Bill Carr 
Bottlenose - Wine & Spirits eBusiness Specialists 
(413) 584-0400 
http://www.bottlenose-wine.com 



More information about the interchange-users mailing list