Perhaps I'm way off base, but you could just do something like

#in thread
$SIG{INT}=sub{ die; #etc}

#in tk/controller
`kill -1 $thread`
[download]

? Or is that signal stuff that was dismissed earlier and/or doesn't work on windows?