perl -le "print join(' ', map({ucfirst \$_;} split(/ /, 'toto fait du +velo', 0)));" [download]
In reply to Re: ucfirst strangeness by PodMaster in thread ucfirst strangeness by dominix