can't read "sub_one": no such variable while executing "regsub -all -nocase "***=$one" $copy_body "$sub_one\"$article_path/$sub_two\" $sub_three" copy_body" invoked from within "if ![regexp -nocase {https://} $one] { regexp -nocase {(<img.+?src=)"*([^/" ]+)[" ]*(.*>)} $one match sub_one sub_two sub_three ### remove ..." (procedure "oli_articles_relink" line 19) invoked from within "oli_articles_relink $article_body $article_path_sohc" invoked from within "set article_body [oli_articles_relink $article_body $article_path_sohc]" ("uplevel" body line 165) invoked from within "uplevel { # /packages/oli-articles/www/view-article.tcl ad_page_contract { Page to view article, reads file from fs @author Gilbert Won..." (procedure "code::tcl::/web/vtec/packages/oli-articles/www/view-article" line 2) invoked from within "code::tcl::$__adp_stub" invoked from within "if { [file exists $__adp_stub.tcl] } { # ensure that data source preparation procedure exists and is up-to-date adp_init tcl $__adp_stub ..." ("uplevel" body line 3) invoked from within "uplevel { if { [file exists $__adp_stub.tcl] } { # ensure that data source preparation procedure exists and is up-to-date adp_init t..." (procedure "adp_prepare" line 3) invoked from within "adp_prepare " (procedure "template::adp_parse" line 30) invoked from within "template::adp_parse [file root [ad_conn file]] {}" (procedure "adp_parse_ad_conn_file" line 7) invoked from within "$handler" ("uplevel" body line 2) invoked from within "uplevel $code" invoked from within "ad_try { $handler } ad_script_abort val { # do nothing }" invoked from within "rp_serve_concrete_file [ad_conn file]" (procedure "rp_serve_abstract_file" line 60) invoked from within "rp_serve_abstract_file "$root/$path"" ("uplevel" body line 2) invoked from within "uplevel $code" invoked from within "ad_try { rp_serve_abstract_file "$root/$path" set tcl_url2file([ad_conn url]) [ad_conn file] set tcl_url2path_info([ad_conn url]) [ad_conn path_inf..."