Fix ForEach method to set property on a scalar object (PowerShell#17213)

Author: daxian-dbw

src/System.Management.Automation/engine/runtime/Binding/Binders.cs

@@ -7454,7 +7454,20 @@ internal static object InvokeAdaptedMember(object obj, string methodName, object
             if (string.Equals(methodName, "Foreach", StringComparison.OrdinalIgnoreCase))
             {
                 var enumerator = (new object[] { obj }).GetEnumerator();
-                return EnumerableOps.ForEach(enumerator, args[0], Array.Empty<object>());
+                object[] argsToPass;
+
+                if (args.Length > 1)
+                {
+                    int length = args.Length - 1;
+                    argsToPass = new object[length];
+                    Array.Copy(args, sourceIndex: 1, argsToPass, destinationIndex: 0, length: length);
+                }
+                else
+                {
+                    argsToPass = Array.Empty<object>();
+                }
+
+                return EnumerableOps.ForEach(enumerator, args[0], argsToPass);
             }
 
             throw InterpreterError.NewInterpreterException(methodName, typeof(RuntimeException), null,

test/powershell/Language/Scripting/Scripting.Followup.Tests.ps1

@@ -35,4 +35,10 @@ Describe "Scripting.Followup.Tests" -Tags "CI" {
         ([bool]$var = 42).GetType().FullName | Should -Be "System.Boolean"
         . { ([bool]$var = 42).GetType().FullName } | Should -Be "System.Boolean"
     }
+
+    It "Setting property using 'ForEach' method should work on a scalar object" {
+        $obj = [pscustomobject] @{ p = 1 }
+        $obj.ForEach('p', 32) | Should -BeNullOrEmpty
+        $obj.p | Should -Be 32
+    }
 }