$level[$index]{"$employee_no-$emp_company_id"} = 1;
# ... becomes ...
$level_ref->[$index]{"$employee_no-$emp_company_id"} = 1;