Posted to tcl by kbk at Mon Nov 27 15:23:26 GMT 2017view pretty
% set x [join {this is a test} \n] this is a test % regexp -all -inline -line {^t[a-z]*} $x this test
% set x [join {this is a test} \n] this is a test % regexp -all -inline -line {^t[a-z]*} $x this test