That should be easy to do... try this instead:
<font color=blue>
# -------------------------------------
# Make sure there is a subject and body
if ($Subject eq "") {
w3t::not_right("$lang{'ALL_FIELDS'}",$Cat);
}
elsif ($Body eq "") {
$Body = "No Text";
<font color=green>$Subject = "$Subject *NT*";</font color=green>
}
</font color=blue>
that should append the Subject with *NT* - of course you can use what you want for that.