[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