1 files changed, 1 insertions, 1 deletions
diff --git a/doop.c b/doop.c
index 0e2a8da040..f5a40efaae 100644
--- a/doop.c
+++ b/doop.c
@@ -1108,7 +1108,7 @@ Perl_do_vop(pTHX_ I32 optype, SV *sv, SV *left, SV *right)
         len = leftlen;
     }
     else {  /* Neither is UTF-8 */
-        len = leftlen < rightlen ? leftlen : rightlen;
+        len = MIN(leftlen, rightlen);
     }
 
     lensave = len;