Yes you are correct I could do that. Could you give me a couple of lines on how to do it. This is what I have so far
system("ls /var/log/apache/access* > found");
open (INF, "found");
@grok = <INF>;
close(INF);
foreach $i (@grok) {
$i =~ s/.*[\/\\](.*)/$1/;
}
Now I got to figure out a loop that will open up a file and count for each domain.
system("ls /var/log/apache/access* > found");
open (INF, "found");
@grok = <INF>;
close(INF);
foreach $i (@grok) {
$i =~ s/.*[\/\\](.*)/$1/;
}
Now I got to figure out a loop that will open up a file and count for each domain.