This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add a pseudo-test to clean up data files for Archive::Tar tests
[perl5.git] / lib / Archive / Tar / t / 99_clean.t
1 #!perl
2
3 BEGIN {
4     if ($ENV{PERL_CORE}) {
5         chdir '../lib/Archive/Tar/t/src' if -d '../lib/Archive/Tar/t/src';
6     }
7 }
8
9 unlink 'long/bar.tar', 'long/foo.tgz', 'short/bar.tar', 'short/foo.tgz';