Re: [tlug] Perl lists

["Shimpei Yamashita" <shimpei@example.com>]

On 8/9/2002, "Brett Robson" <brett@example.com> wrote:

>Got a quick question.
>
>Does anyone know a fast/easy way to append a fix value to each item in a
>list?
>
>eg I have a list of domains in @example.com and I want to put *. on the left
of
>each one. I'm currently uses a foreach.

I doubt you can get much faster or easier than for or foreach. But for
brevity, try

     @example.com = map { "*.$_" } @example.com;

Shimpei.