if(@files && ! scalar keys %tree){$isChanged = 1;} else{foreach my $file (@files){$isChanged = 1 && last if( grep { $files_cached{'stats'}{$file}{$_} != $params->{'files'}{'stats'}{$file}{$_} } ('mtime', 'ctime', 'size') );}} #### (@files && ! scalar keys %tree)? ($isChanged = 1): (foreach my $file (@files){$isChanged = 1 && last if( grep { $files_cached{'stats'}{$file}{$_} != $params->{'files'}{'stats'}{$file}{$_} } ('mtime', 'ctime', 'size') )}); #### if(@files && ! scalar keys %tree){ $isChanged = 1; }else{ foreach my $file (@files){ $isChanged = 1 && last if( grep { $files_cached{'stats'}{$file}{$_} != $params->{'files'}{'stats'}{$file}{$_} } ('mtime', 'ctime', 'size') ); } } #### (@files && ! scalar keys %tree)? ($isChanged = 1): (map { my $file = $_; if( grep { $files_cached{'stats'}{$file}{$_} != $params->{'files'}{'stats'}{$file}{$_} } ('mtime', 'ctime', 'size') ){$isChanged = 1; last;} } @files); #### (@files && ! scalar keys %tree)? ($isChanged = 1): (map { my $file = $_; $isChanged = 1 if( grep { $files_cached{'stats'}{$file}{$_} != $params->{'files'}{'stats'}{$file}{$_} } ('mtime', 'ctime', 'size') ) } @files);