User Input Array Size In Perl