If you want to get an array ref, use fetchrow_arrayref instead of fetchrow_array. Then... use it instead of using $row_ary!

Update Of course, using array refs would lead to using $row_ref->[0] where you use $row_ary[0] - see perldoc perldata anyway.