Bash Script Array Size In Perl