Attempt to free non-existent shared string '_TK_RESULT_', Perl interpreter: 0x207ab410 at /usr/lib64/perl5/vendor_perl/5.8.8/x86_64-linux-thread-multi/Tk.pm line 250.