--- CBOR-XS/t/50_rfc.t	2013/10/26 10:41:12	1.1
+++ CBOR-XS/t/50_rfc.t	2013/10/26 21:06:37	1.3
@@ -1,4 +1,4 @@
-BEGIN { $| = 1; print "1..77\n"; }
+BEGIN { $| = 1; print "1..75\n"; }
 
 # examples from rfc7049
 
@@ -8,6 +8,8 @@
 binmode DATA;
 binmode STDOUT, ":utf8";
 
+my $test;
+
 sub ok($;$) {
    print $_[0] ? "" : "not ", "ok ", ++$test, " - $_[1]\n";
 }
@@ -69,7 +71,7 @@
 +  100                           0x1864
 +  1000                          0x1903e8
 +  1000000                       0x1a000f4240
-+  1000000000000                 0x1b000000e8d4a51000
+   1000000000000                 0x1b000000e8d4a51000
    18446744073709551615          0x1bffffffffffffffff
    18446744073709551616          0xc249010000000000000000
    -18446744073709551616         0x3bffffffffffffffff