Evaluated proc cgc_line line { foreach char [explode $line] {} }