$txt =~ s/\b(\w+)/\u\L$1/g;