-height => $style eq 'workstation'
			? 6
			: 3,  # style eq something else...

##</code><code>##

my $cell_of_spaces = ' ' x 12;

## I've already set up the $Option_b button and am in the
## midst of configuring a "workstation" style/layout

$Output_b->grid( 
	-column => 5,	
	-row => 9,	
	-columnspan => 4,	
	-rowspan => 6,	
	-sticky => 'nsew',
);


my $space_cell_col = 9;
	# column 9 already acted as a separator between two big
	# buttons, so no problem putting blank Labels here.

foreach my $space_cell_row (9 .. 14) {
	build_blank_cell(
		$tl,
		$cell_of_spaces,
		$space_cell_col,
		$space_cell_row,
			);
}


# Now that there are cells on each row between 9 and 14,
# the $Output_b button's rowspan option takes full effect.

sub build_blank_cell {
	my (
		$tl,
		$cell_of_spaces,
		$space_cell_col,
		$space_cell_row
			) = @_;

	my $new_label_widget_l = $tl->Label(
		-textvariable => \$cell_of_spaces,
			)->grid( 
				-column => $space_cell_col,
				-row => $space_cell_row,
				-sticky => 'nsew',
					);
}