http://www.perlmonks.org?node_id=1014940


in reply to Re: Code won't proceed after input.
in thread Code won't proceed after input.

my @AAOcc = map { 0 } 1 .. 20;

Or just:

my @AAOcc = (0) x 20;

:-)

Athanasius <°(((><contra mundum Iustus alius egestas vitae, eros Piratica,

Replies are listed 'Best First'.
Re^3: Code won't proceed after input.
by AnomalousMonk (Archbishop) on Jan 23, 2013 at 16:09 UTC

    Or better yet IMHO:

    >perl -wMstrict -le "my @AAMatrix = qw( A C D E F G H I K L M N P Q R S T V W Y ); ;; my @AAOcc = (0) x @AAMatrix; print qq{@AAOcc}; " 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
      I ran out of votes before getting to your comment, but I definitely approve as it solves a common mistake where manual sizing of multiple arrays is involved
      A Monk aims to give answers to those who have none, and to learn from those who know more.