Help for this page

Select Code to Download

Select or download this

my $string = 'SomeOtherString';
$string =~ s/([[:upper:]])/ $1/g;
my @words = split' ',$string; # @words = ('Some', 'Other', 'String');