$fileName =~ s{$local_dir(.+)}{\.$1};

##</code><code>##

            $fileName =~ s{\Q$local_dir\E(.+)}{\.$1};