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

##</code><code>##

>perl -MO=Concise -e"use strict; print 'a'"
6  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 2 -e:1) v/2 ->3
5     <@> print vK ->6
3        <0> pushmark s ->4
4        <$> const[PV "a"] s ->5
-e syntax OK

##</code><code>##

>perl -MO=Concise -e"require strict; print 'a'"
9  <@> leave[1 ref] vKP/REFC ->(end)
1     <0> enter ->2
2     <;> nextstate(main 1 -e:1) v ->3
4     <1> require sK/1 ->5
3        <$> const[PV "strict.pm"] s/BARE ->4
5     <;> nextstate(main 1 -e:1) v ->6
8     <@> print vK ->9
6        <0> pushmark s ->7
7        <$> const[PV "a"] s ->8
-e syntax OK