if ($i < @{$db{$key}})
   ...

##</code><code>##

ARRAY(0xfdb30)