exit unless defined $coord;
...
$check = $mw->after(10, \&CheckIDE)