...
for (0..$#{$users}) {
    print "Index searched user: ", $_, "\n" if $users->[$_] eq 'user2';
}