#!/usr/local/bin/tclsh8.6
#
# $Id: example1.tcl,v 0.1 2023/10/18 16:39:40 kc4zvw Exp kc4zvw $

puts "Hello World!"                     ;# Greetings
puts {Bad comment syntax example}       # *Error* - no semicolon!

# vim: tabstop=8:

# End Of File


Output:

$ ./example1.tcl
Hello World!
wrong # args: should be "puts ?-nonewline? ?channelId? string"
    while executing
"puts {Bad comment syntax example}      # *Error* - no semicolon!"
    (file "./example1.tcl" line 6)