$string =~ s/##\s*([^#]+)\s*##/##$langhash{$1}##/

##</code><code>##

#                       v
$string =~ s/##\s*([^#]+?)\s*##/##$langhash{$1}##/
#                       ^