$_ = "use strict; use warnings; for (1..10_000) { my \$x = '|0|0|0|0|0|0|'; $_ }";