proc ahoj {} { puts "Je toto funkce, ktera se vypise?" }
echo 'proc ahoj {} {puts "Je toto funkce, ktera se vypise?"}; ahoj' | tclsh