perl array to hash

fritz001 · 05-28-2013, 06:41 AM

Hello everyone

so, here is my issue

@Y=(S1,S2,S3)
@Z=(A1,A2,A3,A4)

I'd like to create hash like

%W=>{S1="A1,A2,A3,A4",S2=>"A1,A2,A3,A4",S3=>"A1,A2,A3,A4"}

and to print

Key is: S1 and values are A1 A2 A3 A4

Key is: S2 and values are A1 A2 A3 A4

Key is: S3 and values are A1 A2 A3 A4

i'm trying to do a backup script but have to better understand hash to arrays

thanks !!

mina86 · 05-28-2013, 07:59 AM

Code:

for (@Y) {
    $W{$_} = join ',' @Z;
}

sundialsvcs · 05-28-2013, 09:18 AM

Often, a better and faster site to field such questions is http://www.perlmonks.org. See you there ...

fritz001 · 05-29-2013, 03:09 AM

yes, well perlmonks.org better fits searching advanced perl scripting.

thanks !~