pp -x -e "while (1) {my $x = 1}"

##</code><code>##

Can't spawn "C:\berrybrew\5.28.0_64_PDL\perl\bin\perl.exe": No error at C:/berrybrew/5.28.0_64_PDL/perl/site/lib/Module/ScanDeps.pm line 1448.
Terminate batch job (Y/N)? y