Bad option `-foreground' at C:/Strawberry/perl/site/lib/Tk.pm line 251.