Re: [mv] Need help with perl P L E A S E

[zb <zb@bisp.com>]

******    message to minivend-users from zb <zb@bisp.com>     ******



Stan Crump wrote:
> 
> ******    message to minivend-users from "Stan Crump" <stanc@amintech.com>     ******
> 
> I know this will show how little I know about using perl with MV, but I'm
> desperate for some help...
> 
> I thought that:
> -- snip --
> <select name=[quantity-name] value=[item-quantity]>
> [perl interpolate=1]
> $myvar = 1;
> while ( $myvar <= 5 ) {
> print "<option value=$myvar [if explicit][condition] [item-quantity] ==
> $myvar;[/condition] selected [/if]> $myvar\n";
Try ro print the stuff into a variable, and then return it. like:
 $tmp .="<option value=$myvar [if explicit][condition] [item-quantity]
==
 $myvar;[/condition] selected [/if]> $myvar\n";
...

return $tmp;
>}
> [/perl]
> </select>
> -- snip --

zb
-
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