User Portlet

I am trying to write a function in Mathematica that takes a string and removes any spaces and punctuations and also turns capital letters into their lowercase equivalents, and keeps all lower case letters. This is what I have so far, and it doesn't...