hello community out there,
new to Perl word!
here is the find section in perl script
##########################################################
my $processed_files = 0;
find({ wanted => sub {
save_file($File::Find::name)
if -f $_
&& $_ =~ /auth\.log$/ },
follow => 1 },
@ARGV
);
##########################################################
During the find process in above section, how to exclude directory /data/logs/master during search process and also ignore duplicate finds.
Is the below way correct:
#######################################################################################################
find(
{
wanted => sub {
save_file($File::Find::name)
if -f $_
&& $_ =~ /auth\.log$/
&& $File::Find::dir ne '/data/logs/master'; # exclude /data/logs/master
},
follow => 1
},
@ARGV
####################################################################################################
thanks in advance!
new to Perl word!
here is the find section in perl script
##########################################################
my $processed_files = 0;
find({ wanted => sub {
save_file($File::Find::name)
if -f $_
&& $_ =~ /auth\.log$/ },
follow => 1 },
@ARGV
);
##########################################################
During the find process in above section, how to exclude directory /data/logs/master during search process and also ignore duplicate finds.
Is the below way correct:
#######################################################################################################
find(
{
wanted => sub {
save_file($File::Find::name)
if -f $_
&& $_ =~ /auth\.log$/
&& $File::Find::dir ne '/data/logs/master'; # exclude /data/logs/master
},
follow => 1
},
@ARGV
####################################################################################################
thanks in advance!