$txt =~ s/_+//g;
$txt =~ s/_+\././;