push @arry, ( $var ) x $cnt;

##</code><code>##

push @arry, $var for 0 .. $cnt;
push @arry, map { $var } 0 .. $cnt;