--- CBOR-XS/t/52_object.t	2013/10/27 22:35:15	1.1
+++ CBOR-XS/t/52_object.t	2013/10/28 22:50:50	1.2
@@ -1,5 +1,6 @@
 BEGIN { $| = 1; print "1..20\n"; }
 
+while(){
 use CBOR::XS;
 
 print "ok 1\n";
@@ -46,4 +47,5 @@
 print $dec eq 777 ? "" : "not ", "ok 19\n";
 
 print "ok 20\n";
+}