First split your array elements in order to get an array of arrays (AoA). Something like this (untested)

my @AoA = [split /[,\s]+/, $_] for @array;
[download]

Then sort the AoA according to the second element. For a numerical sort, something like this (also untested):

@AoA = sort { $b->[1] <=> $a->[1] } @AoH;
[download]

Then you can join the elements of the inner arrays using join or map, I'll leave it to you (you don't give enough details). The whole thing could be done in one single pipeline step, but since you appear to be a beginner, it is probably better to make in in 3 steps as explained above.