The #5805 requires a test change, too.

p4raw-id: //depot/cfgperl@5807

diff --git a/t/op/taint.t b/t/op/taint.t
index 6a9537b..6a5d6b7 100755 (executable)
--- a/t/op/taint.t
+++ b/t/op/taint.t
@@ -552,9 +552,9 @@ else {
                  and not tainted $getpwent[3]
                  and not tainted $getpwent[4]
                  and not tainted $getpwent[5]
-                 and     tainted $getpwent[6] # gecos
+                 and     tainted $getpwent[6]          # ge?cos
                  and not tainted $getpwent[7]
-                 and not tainted $getpwent[8]);
+                 and     tainted $getpwent[8]);        # shell
        endpwent();
     } else {
        for (142) { print "ok $_ # Skipped: getpwent() is not available\n" }