do { $length++ if $_->[2] } for @select;