$Main->geometry(\?\+300,\+300\?);

##</code><code>##

search pattern not terminated at GUI.pl line 18

##</code><code>##

$Main->geometry("?+300,+300?");

##</code><code>##

bad geometry specifier "?+300,+300?" at C:/Perl/site/lib/Tk/Submethod.pm line 37