$text =~ s/_+\././;