state $found = {};
my $key = $^O eq 'MSWin32' ? abs_path( $_ ) : do {
    my ( $dev, $ino ) = stat( $_ );
    "$dev $ino";
};
return if $found->{$key}++;