Fix misformed UVxf format in op.c

diff --git a/op.c b/op.c
index 58b2508..0d6351a 100644 (file)
--- a/op.c
+++ b/op.c
@@ -5774,7 +5774,7 @@ Perl_newATTRSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block)
            if (PL_madskills) {
                if (strEQ(name, "import")) {
                    PL_formfeed = MUTABLE_SV(cv);
-                   Perl_warner(aTHX_ packWARN(WARN_VOID), UVxf"\n", (UV)cv);
+                   Perl_warner(aTHX_ packWARN(WARN_VOID), "0x%"UVxf"\n", (UV)cv);
                }
            }
            GvCVGEN(gv) = 0;