Select Code to Download

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

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