From 7b482f67b317e8de9448a84b374bd55c6e68c356 Mon Sep 17 00:00:00 2001 From: Slaven Rezic Date: Mon, 25 Jan 2016 07:55:16 +0000 Subject: [PATCH] perl 5.23.x compat (RT #106900) --- Fork.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Fork.pm b/Fork.pm index 73791cd..f71da06 100644 --- a/Fork.pm +++ b/Fork.pm @@ -627,7 +627,7 @@ sub new_exec { unless (defined $PERL) { # first find path of perl - my $perl = $; + my $perl = $^X; # first we try $^X, but the path must be absolute (always on win32), and end in sth. # that looks like perl. this obviously only works for posix and win32 -- 2.1.2