1 files changed, 6 insertions, 11 deletions
diff --git a/dist/Carp/t/vivify_gv.t b/dist/Carp/t/vivify_gv.t
index fdc018324b..3ed9912093 100644
--- a/dist/Carp/t/vivify_gv.t
+++ b/dist/Carp/t/vivify_gv.t
@@ -1,16 +1,11 @@
-use warnings;
-use strict;
+BEGIN { print "1..2\n"; }
 
-our $has_is_utf8;
-BEGIN { $has_is_utf8 = exists($utf8::{"is_utf8"}); }
+our $has_is_utf8; BEGIN { $has_is_utf8 = exists($utf8::{"is_utf8"}); }
+our $has_dgrade; BEGIN { $has_dgrade = exists($utf8::{"downgrade"}); }
 
-our $has_downgrade;
-BEGIN { $has_downgrade = exists($utf8::{"downgrade"}); }
+use Carp;
 
-use Test::More tests => 3;
-
-BEGIN { use_ok "Carp"; }
-ok(!(exists($utf8::{"is_utf8"}) xor $has_is_utf8));
-ok(!(exists($utf8::{"downgrade"}) xor $has_downgrade));
+print !(exists($utf8::{"is_utf8"}) xor $has_is_utf8) ? "" : "not ", "ok 1\n";
+print !(exists($utf8::{"downgrade"}) xor $has_dgrade) ? "" : "not ", "ok 2\n";
 
 1;