foreach my $p ('NO_ACCESS', 'FULL','READ', 'WRITE' ,'CHANGE','GENERIC_ALL')
	{
		$left_frame->Radiobutton( -text => "ACE :  $p",
											            -variable => \ $folder_ace_var,
											            -relief   => 'flat',
											            -value    => $p, )->pack(@pl);
	}
	foreach my $p ('NO_ACCESS', 'FULL','READ', 'WRITE' ,'CHANGE','GENERIC_ALL')
	{
		$right_frame->Radiobutton( -text => "ACE :  $p",
											            -variable => \ $subfolder_ace_var,
											            -relief   => 'flat',
											            -value    => $p, )->pack(@pl);
	}