[perl #40628] [TODO] Tcl - need to test reading something in t/cmd_gets.t

[Paul Cochrane‏]

# New Ticket Created by "Paul Cochrane"
# Please include the string: [perl #40628]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40628 >

Need to test actually reading something in, in languages/tcl/t/cmd_gets.t

This ticket is in response to cage task #39704.

[Paul Cochrane‏]

This patch adds the RT ticket number to the associated TODO item in
languages/tcl/t/cmd_gets.t