use strict;

my @array = (["Jochen", 1], ["Hans", 2], ["Annika", 3]);

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