(shopt -s extglob; cd /var/log/apache2 && { cat access.log!(*.gz); gunzip -c access.log.*.gz; }) | perl -nE '/(\S+)(?:.*?"){2} (\d+).*"([^"]*)"$/; next if $2 != 200; ++$x{$3}{$1} }{ for (keys %x) { next if /bot\b/i; $entries = keys(%{$x{$_}}); say "$entries\t$_"; $total += $entries }; say "total: $total"'