Remove an unnecessary 'use utf8' (unnecessary because \x{...}

is now always UTF-8), empty line cosmetics.

p4raw-id: //depot/perl@7998

1 files changed, 2 insertions, 5 deletions

diff --git a/t/pragma/utf8.t b/t/pragma/utf8.t
index 827be5a2ab..8efd571901 100755
--- a/t/pragma/utf8.t
+++ b/t/pragma/utf8.t
@@ -104,6 +104,7 @@ sub nok_bytes {
     ok $1, '123alpha';
     $test++;				# 12
 }
+
 {
     use utf8;
 
@@ -204,10 +205,8 @@ sub nok_bytes {
 
 	ok $1, pack("C*", 0342);
 	$test++;				# 40
-
     }
 
-
     {
 	no utf8;
 	$_="\342\230\272>\342\230\272\342\230\272";
@@ -262,6 +261,7 @@ sub nok_bytes {
 	ok $tmp, pack("C*", 0342, 0230, 0272);
 	$test++;				# 54
     }
+
     {
 	use bytes;
 	no utf8;
@@ -295,7 +295,6 @@ sub nok_bytes {
 
 	ok $1, pack("C*", 0342);
 	$test++;				# 64
-
     }
 
     ok "\x{ab}" =~ /^\x{ab}$/, 1;
@@ -389,8 +388,6 @@ sub nok_bytes {
 {
     # bug id 20000323.056
 
-    use utf8;
-
     print "not " unless "\x{41}" eq +v65;
     print "ok $test\n";
     $test++;