$tree-> = $pane->Tree(
   -width		=> 30,
   -height		=> 1500,
   -itemtype 		=> 'window',
   -relief             	=> 'flat',
   -borderwidth        	=> 0,
   -selectborderwidth	=> 0
)->grid(
   -row 		=> $row,
   -column 		=> 0,
   -columnspan		=> 2,
   -sticky		=> 'w'
);