[perl] Find size of an array in Perl