my $interp_name= $^O eq 'MSWin32' ? Win32::GetShortPathName($^X) : $^X;