Hello Smart Monks, Thanks for your help. I have fixed this by below assignment

I have fixed by below and lable as appropriate about within network or no network users

if (grep { grep { $_ eq "No Network" } @{$hash4{$celln[$o]}} } keys %h
+ash4) {
worksheet->write($r12, 2, "Non Network");
}
[download]

Thanks for your help.