Select Code to Download

my @a = $x;
push @a, @b for 1..$x;

my @a = ( $x, map { @b } 1..$x );

my @a = ( $x, (@b) x $x );