Probably what you want is $#$users. The oA bit doesn't matter. It's the fact that you have a reference to the array that is giving you grief.

use strict;
use warnings;

my $users = [(0..7)];

print $#$users;
[download]

Prints:

7
[download]