puts $tcl_version;set subject {aabbcddeffghh};regsub -all {(.)(?=.*\1)} $subject {} result;puts $result;
Standard input is empty
8.5
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!