for ($string) {
   s/\s+/_/g;    #convert 1+ spaces to a single '_'
   s/'|^_|_$//g; #trim lead/trail _ and remove single quotes
}