Consider using string range instead.
crange is a command in the TclX package.
Return the substring of string given by firstExpr and lastExpr.