RE: set value to minivend form [perl ...]

["Thompson-Jordan" <Thompson-Jordan@mindspring.com>]

******    message to minivend-users from "Thompson-Jordan" <Thompson-Jordan@mindspring.com>     ******

Try something like:

   $Safe{'values'}{'nach'} = $Safe{'values'}{'file1'};

Christopher Thompson

> ******    message to minivend-users from Alexander Lazic
> <a.lazic@usa.net>     ******
>
> Hi all,
>
> i have problems to set an value from the perl-tag to a minivend
> variable.
>
> an example:
>
> [perl interpolat=1]
> my $temp="[item-field eventHREF]";
> my $out="";
> my ($vor,$nach);
> ($vor,$nach) = split(/:/,$temp);
> $nach;
> [/perl]
>
> it work but i need to set $nach to [value name="file1" hide=1
> set="$nach"]
>
> i think it work so:
>
> [perl interpolat=1]
> my $temp="[item-field eventHREF]";
> my $out="";
> my ($vor,$nach);
> ($vor,$nach) = split(/:/,$temp);
> "\[value name="file1" hide=1 set="$nach"\]"; or "\[value
> name=\"file1\" hide=1
> set=\"$nach\"\]";
> [/perl]
>
> but i became "Can't find string terminator '"' anywhere before
> EOF at (eval
> 34) line 6."
>
> Please help !!!
>
> thanks
>
> al;-)
>
> PS:I'm sorry for my english im on learn ;-)
>
> ____________________________________________________________________
> Get free e-mail and a permanent address at
> http://www.netaddress.com/?N=1
> -
> 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
>

-
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