$string =~ s/^\s*(.*?)\s*$/$1/;