Tk::Error: Can't set -geometry to `300x300x+100+100' for Tk::DialogBox=HASH(0x1d85574): unknown option "-geometry" at c:/Perl/site/lib/Tk/Configure.pm line 46.
 at c:/Perl/site/lib/Tk/Derived.pm line 294