[ic] UserTag and require problem

["Bruno Cantieni" <suppressed>]

Does anyone have a clue why the below (cut down to the bone) is not working?

UserTag serialize Routine <<EOR
require Vend::serialize;
sub {
	my(%v) = @_;
	my $serialized = Vend::serialize::serialize(\%v);
	return $serialized;
}
EOR

[perl]
my %data = (
	1		=> 'Yes',
	0		=> 'No',
);
return $Tag->serialize(%data);
[/perl]

This results in:
Safe: Undefined subroutine &Vend::serialize::serialize called at (tag
'perl') line 4.

I plopped the serialize.pm (Scott Hurring,
http://hurring.com/code/perl/serialize/) into the Vend directory and it
appears to load OK when testing as in:

#####
my $can_do = 0;
eval {
	require Vend::serialize;
	$can_do = 1;
};
if ($@) {
	return sub{
		::logDebug("Cannot load serialize: $@");
	}
}else{
	::logDebug("Starting serializer $can_do"); # getting here with 1
}
#etc.
#####



Thanks,
Bruno Cantieni
------------------------------------------------------
Digital Landscape - Cyboretum.com
Web Applications * Web Hosting * e-Commerce
http://www.digi-land.com http://www.cyboretum.com
Phone/Fax: 1+905.668.2255 :: Toll free: 1+877.668.2345
------------------------------------------------------
Autoresponders,Followup,Newsletters
Reliable delivery, ad tracking, live stats
http://auto.responderama.com/ 

_______________________________________________
interchange-users mailing list
suppressed
http://www.icdevgroup.org/mailman/listinfo/interchange-users