You are using Tk::pack geometry manager, you can pack east, west, north, south ... maybe you want Tk::grid?