my $s = [~] :while({.length<1_000_000}) 1..*;