# Same as previous, less redundant.
s/^\("//, s/"\)$// for $string;