#!/usr/bin/tclsh

eval $argv