@positions = grep { $_->[1] !~ /^[GC]/ } @positions;