diff --git a/cpan/Games-Solitaire-Verify/Games-Solitaire-Verify/t/exception-newline.t b/cpan/Games-Solitaire-Verify/Games-Solitaire-Verify/t/exception-newline.t
index 4d609967e..5f5231d17 100644
--- a/cpan/Games-Solitaire-Verify/Games-Solitaire-Verify/t/exception-newline.t
+++ b/cpan/Games-Solitaire-Verify/Games-Solitaire-Verify/t/exception-newline.t
@@ -21,7 +21,8 @@ else
     my $exit_code;
     trap(
         sub {
-            $exit_code = system( $^X, "-I", "lib",
+            $exit_code = system(
+                $^X, "-I", "lib",
                 "bin/verify-solitaire-solution",
                 "t/data/sample-solutions/1.fc-wrong.sol.txt"
             );
diff --git a/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan--FreecellBestA.pl b/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan--FreecellBestA.pl
index 6e14533f6..3e1c5f170 100644
--- a/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan--FreecellBestA.pl
+++ b/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan--FreecellBestA.pl
@@ -7,7 +7,8 @@
 
 my @y_params = ( -0.0024, 0.22, 0.0 );
 
-exec( $^X,
+exec(
+    $^X,
     "time-scan.pl",
     "--method",
     "patsolve",
diff --git a/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan.pl b/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan.pl
index 4c2ab5261..b5ef9e11d 100644
--- a/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan.pl
+++ b/fc-solve/presets/soft-threads/atomic-moves/auto-gen/__Time_Patsolve_Scan.pl
@@ -7,7 +7,8 @@
 
 my @y_params = ( 0.0032, 0.32, -3.0 );
 
-exec( $^X,
+exec(
+    $^X,
     "time-scan.pl",
     "--method",
     "patsolve",
diff --git a/fc-solve/scripts/fcc-delta-stater--test.pl b/fc-solve/scripts/fcc-delta-stater--test.pl
index 47f188dcf..717859187 100644
--- a/fc-solve/scripts/fcc-delta-stater--test.pl
+++ b/fc-solve/scripts/fcc-delta-stater--test.pl
@@ -92,7 +92,8 @@ sub mytest
             $was_printed = 1;
             if ( ( ++$count ) % 100 == 0 )
             {
-                print( $DEAL_IDX ,
+                print(
+                    $DEAL_IDX,
                     ":",
                     ($count),
                     ": max_len = $maxlen ",
diff --git a/fc-solve/scripts/t/range-verifier.t b/fc-solve/scripts/t/range-verifier.t
index a382fc431..45cb7e08c 100644
--- a/fc-solve/scripts/t/range-verifier.t
+++ b/fc-solve/scripts/t/range-verifier.t
@@ -34,7 +34,8 @@ sub _test_range_verifier
     local $Test::Builder::Level = $Test::Builder::Level + 1;
 
     return ok(
-        !system( $^X, $ranger_verifier,
+        !system(
+            $^X,                    $ranger_verifier,
             '--summary-lock',       "$verifier_data_dir/summary.lock",
             '--summary-stats-file', $stats_file,
             '--summary-file',       $summary_file,
diff --git a/fc-solve/source/t/t/fc-solve-output-Test-Trap.t b/fc-solve/source/t/t/fc-solve-output-Test-Trap.t
index 0a1fd72a3..17ed3fea3 100644
--- a/fc-solve/source/t/t/fc-solve-output-Test-Trap.t
+++ b/fc-solve/source/t/t/fc-solve-output-Test-Trap.t
@@ -16,7 +16,8 @@ my $MID24_BOARD = samp_board('24-mid.board');
 {
     trap
     {
-        system( $FC_SOLVE__RAW,
+        system(
+            $FC_SOLVE__RAW,
             qw/-s -i -p -t -sam -sel -to j/,
             samp_board('24-mod-to-test-fc-to-empty-s.board')
         );
@@ -152,7 +153,8 @@ qr/^1591 = Verdict: Intractable.*?^1592 = Verdict: Solved.*?^1593 = Verdict: Sol
 
     trap
     {
-        $status = system( $FC_SOLVE__RAW,
+        $status = system(
+            $FC_SOLVE__RAW,
             qw#
                 --flare-name prefix_of_a_long_name --method soft-dfs -to 0123456789 -sp r:tf -opt -opt-to 0123456789ABCDE
                 -nf --flare-name another_long_name --method soft-dfs -to 0123467 -sp r:tf -opt -opt-to 0123456789ABCDE