#!/usr/local/bin/tclsh8.6
string range [puts [concat "oi"  "n"]] 0 4