Mysql Tsung Erlang函数（dynvars）-转义引号

刚接触Tsung和Erlan，遇到了一个我无法找到答案的问题。我在Tsung dynvars erlang函数中使用了erlang mysql驱动程序，我似乎对转义引号有问题

我想这样做：

      <setdynvars sourcetype="eval"
              code='fun({Pid,DynVars})->
                  mysql:start_link(p1, "localhost", "user", "pass", "db"), 
                  Result = mysql:fetch(p1, "SELECT * FROM consumers WHERE first_name=\'Doonley\'") end.'>
      <var name="myres" />
    </setdynvars>

我实际上需要为select使用一个变量，但我不确定语法。下面是我想要的：

      <setdynvars sourcetype="eval"
              code='fun({Pid,DynVars})->
                  Val='Doonley",
                  mysql:start_link(p1, "localhost", "user", "pass", "db"), 
                  Result = mysql:fetch(p1, "SELECT * FROM consumers WHERE first_name=?", Val) end.'>
      <var name="myres" />
    </setdynvars>

---

尝试将单引号转义为
&apos。例如：

  <setdynvars sourcetype="eval"
          code='fun({Pid,DynVars})->
              mysql:start_link(p1, "localhost", "user", "pass", "db"), 
              Result = mysql:fetch(p1, "SELECT * FROM consumers WHERE first_name=&apos;Doonley&apos;") end.'>
  <var name="myres" />
</setdynvars>


我后来想到了这一点，尽管这似乎也不成功：[“配置错误，中止！”，{function_子句，[{erl_scan，scan_string1，[[“”，68111111110108101121，“”，34,41,32101101000,46]，1，no_col，34，“=eman_tsrif EREHW sremusnoc MORF*TCELES”，“=eman_tsrif EREHW sremusnoc MORF*TCELES”，0]，{erl_scan，scan，string，}，{erl_-scan，string1,5}，{ts_-utils，eval，1}，{ts_-config，parse，2}，{ts_-config，parse，2}，{lists，foldl，3}]}]Hm，似乎字符串因为撇号而变成了一个深列表。我猜这是Tsung中的一个bug，可以通过将
erl_-scan:string（code）
更改为
erl-scan:string（list:flatten（code））
在
t_utils.erl
的
eval
功能中。谢谢，似乎可以。我已经提交了一份报告。
  <setdynvars sourcetype="eval"
          code='fun({Pid,DynVars})->
              mysql:start_link(p1, "localhost", "user", "pass", "db"), 
              Result = mysql:fetch(p1, "SELECT * FROM consumers WHERE first_name=&apos;Doonley&apos;") end.'>
  <var name="myres" />
</setdynvars>