Re^2: Replace duplicate files with hardlinks

Given ...

...
 push @{ $real_dups{ stat($filename)->inode } }, $filename;
...
[download]

... myuserid7 (*{), you may be using built-in &stat function and not &File::Stat::stat.

That, or &File::Stat::stat failed for some reason and did not return an object as expected (to state the obvious). In which case print the file path being questioned and verify its properties yourself when you see the error message again.

Could you verify that one way or another?

Comment on Re^2: Replace duplicate files with hardlinks Select or Download Code


Perl-Sensitive Sunglasses
	PerlMonks