my @a2 = map { /(.*),(.*)/; { x => $1, y => $2 } } @a1;