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