$interessa =~ s/$um/\.$um/;

##</code><code>##

$interessa =~ s/$um\b/\.$um/;