for ($br = 0; $br <= $#{$array}; $br++)

##</code><code>##

for ($br = 0; $br <= @$array; $br++)

##</code><code>##

for ($br = 0; $br <= scalar(@$array); $br++)