Select Code to Download

    # convert double-quotes to single-quotes
    if( $$quote && $text =~ s/"/''/s ){
...
    }
    while ($text =~ s/"([^"]*)"/``$1''/sg) {};
    $$quote = 1 if $text =~ s/"/``/s;

stuff "passage one" more stuff "passage two" stuff

stuff ''passage one`` more stuff ''passage two`` stuff