[ic] mv_credit_card_reference

[Javier Martin]

> > Thanks a lot Mike. I solved it by calling:
> >
> >   my $cc_ref = (Vend::Order::encrypt_standard_cc($CGI, 1)) [6]
> >
> > from [perl], but &calc looks cleaner because I'm validating the
> CC twice...
> >
>
> Obviously you are running AllowGlobal....you should put in a
> warning "don't
> try this at home". 8-)

Yes, I think I will follow those guidelines from the docs about locking down
the server. I've removed the Vend::Order::encrypt_standard_cc call, and have
changed [perl]...[/perl] by &calc=<<EOF ... EOF.

I still have problems though, because I have a lot more of code which gets
trapped by Safe::Hole, concretely calls to Digest::MD5 and LWP. I've moved
all of this to globalsubs and included them from the main
/etc/interchange.cfg file, but when I call one of the subs, I get something
like:

  process Safe: Undefined subroutine &MVSAFE94805::calc_md5 called at (eval
257) line 40.

I've tried:

  &calc=<<EOF
     ...
     my_global_sub($something);
  EOF

as well as:

  &calc=<<EOF
    ...
    ::my_global_sub($something);
  EOF


Thanks again!

Javier