#!/bin/sh
# the next line restarts using tclsh \
exec tclsh "$0" "$@"

# Convert text from system encoding to utf-8

fconfigure stdout -encoding utf-8
puts -nonewline [read stdin]
.