Added perl solution for LowerCase
Added perl solution for SwapCase