join '|', map { s/"([^"]*)$/$1/ if y/"// & 1; $_ } split /\|/;