return \@retary, $count;
    ...
    ($ary1, $count) = read_data(...);