... return $count,@retary;

...

($num,@ary1)=blablabla