($str) = ($str =~ /^\s([\w+\s{0,}]{1,})\s{0,}$/) ; #case 2/3