diff -r -u IO-All-0.87.orig/t/read.t IO-All-0.87/t/read.t
--- IO-All-0.87.orig/t/read.t	2024-07-12 23:29:29.594115149 +0200
+++ IO-All-0.87/t/read.t	2024-07-13 12:43:44.872734094 +0200
@@ -6,7 +6,7 @@
 
 my $outfile = "$t/out.pm";
 ok(not -f $outfile);
-my $input = io('lib/IO/All.pm')->open;
+my $input = io('lib/IO/All.pod')->open;
 ok(ref $input);
 my $output = io($outfile)->open('>');
 ok(ref $output);
@@ -17,7 +17,7 @@
 $output->write while $input->read;
 ok(not length($buffer));
 ok($output->close);
-test_matching_files($outfile, 'lib/IO/All.pm');
+test_matching_files($outfile, 'lib/IO/All.pod');
 ok($output->unlink);
 
 del_output_dir();
diff -r -u IO-All-0.87.orig/t/read_write.t IO-All-0.87/t/read_write.t
--- IO-All-0.87.orig/t/read_write.t	2024-07-12 23:29:29.590115131 +0200
+++ IO-All-0.87/t/read_write.t	2024-07-13 12:43:52.018766082 +0200
@@ -4,11 +4,11 @@
 use IO::All;
 use IO_All_Test;
 
-my $io = io('lib/IO/All.pm');
+my $io = io('lib/IO/All.pod');
 my $buffer;
 $io->buffer($buffer);
 1 while $io->read;
 ok(length($buffer));
-test_file_contents($buffer, 'lib/IO/All.pm');
+test_file_contents($buffer, 'lib/IO/All.pod');
 
 del_output_dir();
diff -r -u IO-All-0.87.orig/t/synopsis2.t IO-All-0.87/t/synopsis2.t
--- IO-All-0.87.orig/t/synopsis2.t	2024-07-12 23:29:29.591115136 +0200
+++ IO-All-0.87/t/synopsis2.t	2024-07-13 11:56:28.923878422 +0200
@@ -1,5 +1,5 @@
 use strict; use warnings;
-my $t; use lib ($t = -e 't' ? 't' : 'test');
+my $t; use lib ($t = -e 't' ? 't' : '_test');
 use Test::More tests => 10;
 use IO::All;
 use IO_All_Test;
@@ -16,7 +16,7 @@
 
 for my $line (sort @results) {
     my $dataline = <DATA>;
-    $dataline =~ s/^t\//test\// if -e 'test';
+    $dataline =~ s/^t\//_test\// if -e '_test';
     is($line, flip_slash $dataline);
 }
 
@@ -26,7 +26,7 @@
     grep {! /CVS|\.svn/} io("$t/mydir")->all_files(0)
 ) {
     my $dataline = <DATA>;
-    $dataline =~ s/^t\//test\// if -e 'test';
+    $dataline =~ s/^t\//_test\// if -e '_test';
     is("$_\n", flip_slash $dataline)
 }