perl explode string to array

my @words = split / /, $str;