Help for this page

Select Code to Download

Select or download this

perl -le 'print $_ for split( /([A-Z])/, shift)' AbcDefGhi
A
...
ef
G
hi

Select or download this

% perl -le 'print $_ for split( /(?=[A-Z])/, shift )' AbcDefGhi
Abc
Def
Ghi