my $original_file = '/path/to/file'; my $dir = '/where/to/find/hardlinks/'; chomp for @hard_links = `find \Q$dir\E -inum \$(find \Q$original_file\E -printf "%i")`;