foreach my $i (0..$#$types) {
    if ($i && $i == $#$types) {
        $sentence .= ($matches > 1) ? ' and ' : ' or ';
    } elsif ($i) {
                $sentence .= ', ';
            }