Use Perl array size operator