#!perl -p
s/[A-Z]/ \L$&/g