my $element = $array [$big_num];

##</code><code>##

    my ($element) = grep {$_ == $big_num} 0 .. $#array;