--- Prima-1.78/Makefile.PL	2026-10-18 15:30:11.190548696 +0200
+++ Prima-1.78/Makefile.PL	2026-10-18 15:43:38.866956726 +0200
@@ -2752,7 +2752,7 @@ SHOWMORE
 	  	$t .= <<H;
 
 include/generic/$base.h include/generic/$base.inc include/generic/$base.tml: \$(FIRST_MAKEFILE) $showlog class/$base.cls $ancestors
-\t$^X -I. utils/prima-gencls.pl --inc --h -Iclass --tml $clsfile include/generic
+\t\$(PERL) -I. utils/prima-gencls.pl --inc --h -Iclass --tml $clsfile include/generic
 
 H
 		push @alltml, "include/generic/$base.tml";
@@ -2762,7 +2762,7 @@ H
 
 	$t .= <<H;
 include/generic/thunks.tinc: \$(FIRST_MAKEFILE) @alltmldeps
-\t$^X utils/prima-tmlink.pl -Iinclude/generic -oinclude/generic/thunks.tinc @alltml
+\t\$(PERL) utils/prima-tmlink.pl -Iinclude/generic -oinclude/generic/thunks.tinc @alltml
 
 H
 
@@ -2822,7 +2822,7 @@ xtest ::
 \t\$(MAKE) test TEST_FILES=t/*/*.xt
 
 bindist: all
-\t$^X $0 --bindist $DISTNAME
+\t\$(PERL) $0 --bindist $DISTNAME
 
 devclean:
 \t\$(RM_F) api/*$Config{_o} class/*/*$Config{_o} class/*$Config{_o} img/*$Config{_o} $platform/*$Config{_o}
@@ -2838,7 +2838,7 @@ H
 	if ($unix or $cygwin) {
 		$t .= <<H for @exe_files; # .pl -> .
 $_: $_.pl
-\t$^X $0 --cpbin $_.pl $_
+\t\$(PERL) $0 --cpbin $_.pl $_
 
 H
 	}