$mw->Label(-text => 'Package Selection',
	-justify => 'left'
	)->grid(-sticky => 'w', -column => 0, -row => 1);

    my $package = 'normal';
    foreach my $type (qw(normal pckg_A pckg_B)){
	$mw->Radiobutton(
		-text => $type,
		-value => $type,
		-variable => \$package,
	#)->grid(-sticky => 'w', -column => 1, -row => 2);
	)->grid(-sticky => 'w', -column => 1, -row => 2, -columnspan=>20, -padx => 50, );
}