$line =~ s/"([^"])"/$1/;