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

##</code><code>##

for(@$types) {
    if($_ eq $types->[-1]) {
        $sentence .= $matches>1 ? ' and ' : ' or '
    } else { $sentence .= ', ' }