[ic] UserTag and require problem

Bill Carr bill at worldwideimpact.com
Fri Feb 9 13:42:53 EST 2007


On Feb 9, 2007, at 12:54 PM, Bruno Cantieni wrote:

> 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.
> #####
I think you may have to add the AllowGlobal directive for your  
catalog to do stuff like that.

Bill Carr
Bottlenose - Wine & Spirits eBusiness Specialists
(877) 857-6700
http://www.bottlenose-wine.com



More information about the interchange-users mailing list