my @new_array =
    map  { $_->[0] }
    sort { $a->[1] cmp $b->[1] }
    map  { [ $_, get_sortable_item($_) ] }
        @old_array;

sub get_sortable_item {
    my $data = shift;
    return (split /:/, $data, 3)[1];
}