In older Active State releases Tk needed to be installed via ppm. Newer perl builds from AS come with Tk, In either case I've never had a problem running Tk on and build of windows(having worked with NT,2K,ME, and 98SE)

The reason floor.pl doesn't run, well look at the code, it doesn't use Tk;, for one thing. floor.pl is one of a few dozen scripts initialized through the widget demo. widget is installed on the path so you can run it from any directory by typing widget, or from Start->Run. On the widget demo, floor is under "Canvas #6. A building floor plan"