Thanks tybalt89, your solution worked
In reply to Re^2: Perl Tk nonblocking by rjbuckley in thread Perl Tk nonblocking by rjbuckley