Select Code to Download

    if ( $tagname eq 'idx:orth' and $$attr{value} =~ /[$um]/ ) {
        $text =~ s/\s+infl="[^"]+"//;     #<-- add this line
        $text =~ s/([$um])/$replace{$1}/g;
        $output .= $text;  # repeat the tag with modified umlauts
    }