use utf8;
...
$jobtitle =~ s/([\x{80}-\x{FFFF}])/'&#' . ord($1) . ';'/gse;
...