use strict;

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

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