my @result = grep{ $_->[1] > 2 }@array