--- ../File-Slurp-9999.19.orig/t/error.t	2011-05-03 04:03:02.000000000 -0400
+++ t/error.t	2015-09-18 10:51:51.091968000 -0400
@@ -77,6 +77,7 @@
 		sub	=> \&prepend_file,
 		args	=> [ $file_name ],
 		error	=> qr/read_file/,
+		posttest => sub { unlink $file_name, "$file_name.$$" },
 	},
 	{
 		name	=> 'prepend_file write error',