DB<3> print 'my cardio workout' =~ m/\b\w/g;
mcw

##</code><code>##

  DB<4> print map uc, 'my cardio workout' =~ m/\b\w/g;
MCW