my ($User,$IP,%Info)=ReadItem(@Item); #or something ;)))
$LookUp{$User}=$Lookup{$IP}=\%Info;