$Tmp =~ s|\_\_(.+?)\_\_||g;