ip mit regexp aus einer Datei filtern: wie filtert man aus einer log datei ips - #53023 (Allgemeines zu Perl)

renee

2005-03-31 15:20

User since
2003-08-04
14371 Artikel
ModeratorIn

while (<LOG>) { ==>

Code: (dl )

1
2
3

my $counter_file1 = 0;
while (<LOG>) {
  $counter_file1++;

while(<FILE2>){ next unless($_ =~ m/ip/s); ==>

Code: (dl )

my $counter_file2 = 0;
  while(<FILE2>){
    next unless($_ =~ m/ip/s);
    $counter_file2++;

Am Ende dann halt noch noch

Code: (dl )

print qq~
  IPs in $file: $counter_file1
  IPs in $file2: $counter_file2
~;