# vi: et sts=4 sw=4 ts=4 use strict; use warnings; use Test::Simple tests => 3; use TestFunctions; my $tarball_dir = prep_tar(); my $test_dir = "$tarball_dir/t/zero-size"; my @files = ( "$test_dir/empty1", "$test_dir/empty2", ); # Smoke test ok !are_hardlinked(@files), 'not hardlinked before we start'; run_script($test_dir); ok file_exists(@files), 'files were not accidentally deleted'; ok !are_hardlinked(@files), 'zero-sized files did not get hardlinked';