my @tags = split(/\s|\/|-|\(|\)/, $$arr[0]);
my @new = map { $tags[$_] ? $tags[$_] eq "in" ? "" : $tags[$_] : "" } (0..9); #mit "" auffüllen, bis es 10 Tags sind
if(
    ($headline =~ m/.*$new[0].*/i)  &&
    ($headline =~ m/.*$new[1].*/i)  &&
    ($headline =~ m/.*$new[2].*/i)  &&
    ($headline =~ m/.*$new[3].*/i)  &&
    ($headline =~ m/.*$new[4].*/i)  && 
    ($headline =~ m/.*$new[5].*/i)  &&
    ($headline =~ m/.*$new[6].*/i)  &&
    ($headline =~ m/.*$new[7].*/i)  &&
    ($headline =~ m/.*$new[8].*/i)  &&
    ($headline =~ m/.*$new[9].*/i))
{
    $jobbezeichnung = $$arr[0];
}