if ($match){
        my @tmp = @line[@sorted_cols];
        print "@tmp\n";
        push @arraynew,[@tmp];
    }