foreach my $array ( @{$arrayRef} )
{
        while ($array->[1] =~ /<irgendeinmatch/igm) {
                $array2=$1;
        }
        print $array->[0], $array2"\n";
}