Select Code to Download

$ uname -a
CYGWIN_NT-10.0-19044 titan 3.3.6-341.x86_64 2022-09-05 11:15 UTC x86_6
+4 Cygwin

ken@titan /cygdrive/c/Users/ken/tmp
$ ./pm_11147080_tk_mem.pl

Microsoft Windows [Version 10.0.19044.2075]
(c) Microsoft Corporation. All rights reserved.
...

C:\Users\ken\tmp>perl -E "use Tk; say $Tk::VERSION"
804.034

C:\Users\ken\tmp>perl pm_11147080_tk_mem.pl

...

C:\Users\ken\tmp>perl pm_11147080_tk_mem.pl
Free to wrong pool 25c3ed0 not 2ee60830 at pm_11147080_tk_mem.pl line 
+43.

$MAIN_WINDOW->update();