Changeset 2160
- Timestamp:
- 03/22/08 00:14:41 (8 months ago)
- Files:
-
- psad/trunk/psad (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
psad/trunk/psad
r2158 r2160 3940 3940 my @lines = <A>; 3941 3941 close A; 3942 my $i = 1;3942 my $i = 0; 3943 3943 LINE: for my $line (@lines) { 3944 3944 $i++; … … 3972 3972 $iaddr = inet_aton($hostname); 3973 3973 unless ($iaddr) { 3974 &sys_log( "could not resolve auto_dl $hostname ".3974 &sys_log(qq|could not resolve auto_dl "$hostname" | . 3975 3975 "to an IP at line $i"); 3976 3976 next LINE; 3977 3977 } 3978 3978 $ip = inet_ntoa($iaddr) or 3979 &sys_log( "could not resolve auto_dl $hostname ".3979 &sys_log(qq|could not resolve auto_dl "$hostname" | . 3980 3980 "to an IP at line $i"); 3981 3981 $mask = '32'; ### single IP
