This is simple, but your solutions is as good as any really:

foreach (0 .. @a.""-1)
    { $a[$_] = $a[$_] . '-' . $b[$_]; }
[download]