I have to convert some script from perl to tcl.

Why? You already have a perl script which (supposedly) works. Why translate it into a more niche scripting language which you understand less than Perl?