The second part of a substitution is just a plain string, not a regular expression. To include a part from the matched string, you have to use capture groups, introduced by parentheses. To uppercase a part of a string, use
\U:
$this_term =~ s/\.([a-z])/.\U$1/g;