$name = "RONNIE NUNN";
  $name =~ s/(\S+)/\u\L$1/g;