;# your code goes here set theString "I am You a string sds" if {[regexp -- {string$} $theString]} { puts "Ends with 'string'" } if {![regexp -- {You} $theString]} { puts "Does not start with 'You'" }