$s[^taint[uri;te st.]]
$h[ $.$s[$s] ]
^apply-taint[regex; ^h.foreach[k;v]{'$k'=>'$v'} ]