autodie/t/unlink.t

5 use constant TMPFILE      => "$Bin/unlink_test_delete_me";
8 make_file(TMPFILE);
11 -e TMPFILE or plan skip_all => "Failed to create test file";
14 unlink TMPFILE;
17 if(-e TMPFILE) {plan skip_all => "Failed to delete test file: $!";}
20 make_file(TMPFILE);
23 -e TMPFILE or plan skip_all => "Failed to create test file";
31 	unlink TMPFILE;
34 ok(! -e TMPFILE, "File does not exist");
40 	unlink TMPFILE;
50 make_file(TMPFILE);
51 ok(-e TMPFILE, "Sanity: file exists");
56     unlink TMPFILE, NO_SUCH_FILE;