Re: need help with perl / scratch variable

[Nick Temple <ntemple@tgl.net>]

******    message to minivend-users from Nick Temple <ntemple@tgl.net>     ******

Hi Mike =

the '.' character in Perl is special - it is a wildcard that stands for any
character, so you will need to escape it.

Try:

	($name, $ext) = split /\./, $image;

Nick



At 08:53 PM 5/29/99 -0500, you wrote:
>******    message to minivend-users from "kenshin"
<kenshin@planetanime.com>     ******
>
>Hello,
>I'm running minivend 3.12 with perl 5.005
>
>I'm trying to run the following code that reads a field in my products
>database and then splits the value on the '.' and is supposed to return the
>$name as a scratch variable for "small_image"
>
>$name is returning null or empty.  I have no problem returning $image though
>so i'm wondering if 'split' is not supported in "Safe perl."  I'm new to
>perl programing so i may be really far off the target on this one.  But any
>help would be appreciated.
>
>  [perl scratch interpolate=1]
>  $image = '[item-field image]';
>  ($name, $ext) = split /./, $image;
>  $Safe{'scratch'}{'small_image'} = $name;
>  [/perl]
>
>thanks,
>mike k.
>
>-
>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