committable6

query

my $p = run <perl6 -e>, ｢my $cnt=0; $*ARGFILES.words.grep(/whale {++$cnt}/); say $cnt;｣, ‘sandbox/moby10b.txt’; exit $p.signal if $p.signal ≠ 0; exit $p.exitcode if $p.exitcode ≠ 0

result

¦«2015.12,2016.01.1,2016.02,2016.03,2016.04,2016.05,2016.06,2016.07.1,
  2016.08.1,2016.09,2016.10,2016.11,2016.12,2017.01,2017.02»:
===SORRY!=== Error while compiling /tmp/DV8m2v5pl6
Confused
at /tmp/DV8m2v5pl6:1
------> oby10b.txt’; exit $p.signal if $p.signal⏏ ≠ 0; exit $p.exitcode if $p.exitcode ≠ 
    expecting any of:
        infix
        infix stopper
 «exit code = 1»
¦«2017.03,2017.04.3»:
read string requires an object with REPR MVMOSHandle (got Scalar with REPR P6opaque)
  in block <unit> at -e line 1

 «exit code = 1»
¦«2017.05»:
0

¦«2017.06,2017.07,2017.08,2017.09,2017.10,2017.11,2017.12,2018.01,
  2018.02.1,2018.03,2018.04.1,2018.05,2018.06,2019.03.1,2020.02.1,
  HEAD(439b860)»:
1322

¦«2018.08,2018.09,2018.10,2018.11,2018.12,2019.07.1,2019.11,2020.01»:
 «exit code = 11»