$DATABASE{$fname}=pack ($pack_rules,$fname,$lname,$age,$dep)