Avoid using bytes in require.t, as pack "C0U" does what we need.

diff --git a/t/comp/require.t b/t/comp/require.t
index 0746b3b..d561ad6 100644 (file)
--- a/t/comp/require.t
+++ b/t/comp/require.t
@@ -30,7 +30,6 @@ sub write_file {
     my $f = shift;
     open(REQ,">$f") or die "Can't write '$f': $!";
     binmode REQ;
-    use bytes;
     print REQ @_;
     close REQ or die "Could not close $f: $!";
 }
@@ -281,7 +280,7 @@ EOT
 
 if ($Is_EBCDIC || $Is_UTF8) { exit; }
 
-my $utf8 = chr(0xFEFF);
+my $utf8 = pack "C0U", 0xFEFF;
 
 $i++; do_require(qq(${utf8}print "ok $i\n"; 1;\n));