This is an important message. Better not to wrap it.
unless ($all_pass) {
diag(<<END
Not all tests succeeded. Because testing every single Unicode code
unless ($all_pass) {
diag(<<END
Not all tests succeeded. Because testing every single Unicode code
-point would take too long, $0 tests a random subset every run. In
-order to reproduce this failure exactly, the same seed must be used.
-Save this seed!!: $seed
+point would take too long, $0
+tests a random subset every run. In order to reproduce this failure exactly,
+the same seed must be used. Save this seed!!: $seed
Setting the environment variable PERL_TEST_CHARNAMES_SEED with
$seed
Setting the environment variable PERL_TEST_CHARNAMES_SEED with
$seed