package require Tk

proc halloWelt {} {
    puts stdout "Hallo Welt"
}
button .b -text "Hallo Welt" \
    -command halloWelt
pack .b