$txt = ' __\\U//__ '; print("$txt\n"); # Prints __\U//__ $txt = ' __\\\\U//__ '; print("$txt\n"); # Prints __\\U//__ $txt =~s/\\/\\\\/g; print("$txt\n"); # Prints __\\\\U//__