sub guiStart
{
	my ($client,$login) = @_;
	
	my $mw = MainWindow->new(-borderwidth=>30,
	                         -title=>"Duplicates: ".$$client);

	my %layout = ('frame'   => [],
	              'label'   => [],
	              'callback'=> []);
	
	#Construct labels 
	$layout{'label'}->[0] = 'List Available Data';
	$layout{'label'}->[1] = 'Remove Data';
	$layout{'label'}->[2] = 'Add Data';
	$layout{'label'}->[3] = 'Identify Duplicates';
    $layout{'label'}->[4] = 'Change Client';
	$layout{'label'}->[5] = 'Exit Application';
	
	#Set callbacks
	$layout{'callback'}->[0] = [\&listData,$client,$login,$mw];
	$layout{'callback'}->[1] = [\&removeData,$client,$login,$mw];
	$layout{'callback'}->[2] = [\&addData,,$client,$login,$mw];
	$layout{'callback'}->[3] = \&identifyDuplicates;
    $layout{'callback'}->[4] = \&changeClient;
	$layout{'callback'}->[5] = \&exitApp;			
	
	for (0..5)
	{
		#Create the frames
		$layout{'frame'}->[$_]  = $mw->Frame();
	
		#Create the buttons
		$layout{'frame'}->[$_]->Button(-text   =>$layout{'label'}->[$_],
		 						       -width  =>20,
		                               -command=>$layout{'callback'}->[$_])->pack();
		$layout{'frame'}->[$_]->pack();
	}
	
	MainLoop;
	
	return;
}