Subword movement funtions should be specified as

(interactive "^p") instead of (interactive "p") to allow shift selection.

When cua-mode is enabled, shift-selection is also enabled since all the functions have

(put 'subword-forward 'CUA 'move)

so, I think it should be consistent.

Just my 2 cents.

Matt