next if $File::Find::name eq '.' or $File::Find::name eq '..';

##</code><code>##

    return unless -f;

##</code><code>##

    open my $file, '<', $File::Find::name or die "Error openning file: $!\n";

##</code><code>##

    open my $file, '<', $_ or die "Error openning '$_' $!\n";