Re: [mv] How To Extract Item Codes At Checkout Question: Followup

[OTR Comm <otrcomm@wildapache.net>]

Hello again,

Another question:

cfm@maine.com wrote:
> 
> On Sat, Jan 20, 2001 at 10:25:47AM -0700, OTR Comm wrote:

> 
>   for (@{$Vend::Items}) {
>     stuff orders, order_items # whatever schema
>     $MERCHANTS_IN_THIS_ORDER{$item->{merchant}}; # unique list
>   }
>   for (keys $MERCHANTS_IN_THIS_ORDER) {
>     %o=SELECT * FROM orders WHERE order_number=$this_order_number;
>     %v=SELECT * FROM order_items WHERE order_number=$this_order_number
>       AND merchant_id=$this_merchant_id;
>     &post_advice($this_merchant,\%o,%v); # might be email, db, whatever
>   }
> 

I have realperl defined as a UserTag in minivend.cfg and added the
following code to checkout.html just for some debugging:

[realperl]
{

        open (MV,"+>>pages/mvchk");
        
        print MV "In checkout:\n";
        

        foreach $item (@{$Vend::Items}) {

                print MV "item = $item\n";

        }

        close(MV);
        
}
[/realperl]

The snippet works fine if I comment out the foreach loop (I get output
to pages/mvchk), but dies if I try to evaluate it.

Do you think that this is a problem with hos I have realperl defined, or
is it a problem with how I address @{$Vend::Items} on the foreach loop?

Thanks,
Murrah Boswell

> &do_my_behind_the_scene_stuff # can be entirely separate outside mv
> 
> cfm
> 

> 
> --
> 
> Christopher F. Miller, Publisher                             cfm@maine.com
> MaineStreet Communications, Inc         208 Portland Road, Gray, ME  04039
> 1.207.657.5078                                       http://www.maine.com/
> Content management, electronic commerce, internet integration, Debian linux
> 
> _______________________________________________
> Minivend-users mailing list
> Minivend-users@minivend.com
> http://lists.akopia.com/mailman/listinfo/minivend-users


_______________________________________________
Minivend-users mailing list
Minivend-users@minivend.com
http://lists.akopia.com/mailman/listinfo/minivend-users