[t] fix test to run in older perls.   cxreg++ (inspired from TT#543)
[t] fix test to run in older perls.
  cxreg++ (inspired from TT#543)


git-svn-id: 6e74a02f85675cec270f5d931b0f6998666294a3@38715 d31e2699-5ff4-0310-a27c-f18f2fbe73fe

ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot,ashgti/parrot