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

Strat

2005-03-31 19:58

User since
2003-08-04
5246 Artikel
ModeratorIn

1. "uninitialized value" ist kein Fehler, sondern eine Warnung

2. abfragen, ob was defined ist, kannst du mit defined($wert), also z.B.

Code (perl): (dl )

my $result = do {
  if (defined($filterPassword)) {
    defined($filterIp) ? 
      $filterPassword eq $pass and $filterIp eq $ip :
      $filterPassword eq $pass;
  } # if
  elsif (defined $filterIp) {
    $filterIp eq $ip;
  }
  else {
    0;
  }
}; # do

if ($result) {
  push(@{$filteredLines{$ip}},$_); # oder was auch immer
}

\n\n

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/