print map lc split/(?=[A-Z])/,"ThisString"; print map lc split/(?=[A-Z])/,"SomeOtherString"; __DATA__ output: this string some other string