@array4	

900000001
900000002
900000007
900000009
900000010
900000011
900000012
500000008
##</code><code>##

foreach my $id (sort keys %hash) {
		     foreach my $network(keys %{ $hash{$id} }) {
       	   foreach (0..$#array4) {
	    if (exists $hash{$array4}{$network}) {
		print $hash5{$array4};
		 } else {
								 
			print "Not Loggedin";					 
					
                            }
							}
    }

}