Sorting three arrays

[FreeBASE]

I have 3 arrays

@a = ('a1','a2','a3');
@b = ('b1','b2','b3');
@c = ('c1','c2','c3');

I need to sort the data like:

a1 b1 c1
a2 b2 c2
a3 b3 c3

Thanks in advance..

N

 

[justice41]

A general format for accessing multiple arrays (of the same length) is

for (0..$#a) {
    # do something here with
    # $a[$_], $b[$_], and $c[$_]
}

you'll have to fill in the loop contents since you didn't specify whether you wanted the output printed or stuffed into three new arrays or into an array of arrays (multidimensional array). This isn't really sorting, though, more like transposing.

jaa

 

[greadey]

Here's one way using the ol' Schwartzian transform;

@a = map{$_->[0]}
sort{$a->[1] <=> $b->[1]}
map { [$_, /[a-z](\d)/] } @a;

do the same for $b and $c.

then;

for(0 .. $#a) {

print join('\s', $a[$_], $b[$_],$c[$_]) . &quot;\n&quot;;

}