Re: minivend->perl->eval

[Larry Leszczynski <larryl@furph.com>]

******    message to minivend-users from Larry Leszczynski <larryl@furph.com>     ******

Hi Alexander -

> my $string =<<'EOF';
> [sql array]select refathlets,refevents,refsports,sortname from
> products[/sql]
> EOF
> 
> my @arry = eval $string;

If you are using the [sql] tag inside a [perl] tag, you do not need to do
eval yourself, because MiniVend will interpolate it for you.

I am not sure, but I think you are meaning to do something like this:

[perl interpolate=1]
 my @arry = qw( [sql array]select refathlets,refevents,refsports,sortname
                           from products[/sql] );

 foreach ( @arry ) {
   ... do some stuff ...
 }

[/perl]


Larry Leszczynski
larryl@furph.com
--
  furph, Inc.	WWW/Unix/Windows Solutions	734-513-7763 (voice)
info@furph.com	   http://www.furph.com		734-513-7759 (FAX)

-
To unsubscribe from the list, DO NOT REPLY to this message.  Instead, send
email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
Archive of past messages: http://www.minivend.com/minivend/minivend-list