foreach my $ele (@SlectedColumns[1..$NrCoumns]) {
        
       do_something unless $ele == 0;
}