foreach my $this_user (@{$users}){