DB<19> $dyn = 3 DB<20> $gen = join " ", ("{1,2}") x $dyn DB<21> say for <"$gen"> 1 1 1 1 1 2 1 2 1 1 2 2 2 1 1 2 1 2 2 2 1 2 2 2