my %e;
my $max = 4;
foreach my $nr  (1..$max)
{
	$e{"uid_$nr"} = $nr;
}