diff options
| author | ivan <ivan> | 2000-12-10 21:16:26 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2000-12-10 21:16:26 +0000 |
| commit | c328bbcdf207c83be69c9b925e597d4f92288806 (patch) | |
| tree | 96392a41b60e3ab5f4475bd30229daa4c960b81b /fs_sesmon/FS-SessionClient | |
| parent | eefc403e7269f191637fa0b4a38b33dc8d206051 (diff) | |
fix uninitialized value errors
Diffstat (limited to 'fs_sesmon/FS-SessionClient')
| -rw-r--r-- | fs_sesmon/FS-SessionClient/fs_sessiond | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/fs_sesmon/FS-SessionClient/fs_sessiond b/fs_sesmon/FS-SessionClient/fs_sessiond index d7284b252..bfdb20a1d 100644 --- a/fs_sesmon/FS-SessionClient/fs_sessiond +++ b/fs_sesmon/FS-SessionClient/fs_sessiond @@ -44,7 +44,8 @@ for ( ; $paddr = accept(Client,Server); close Client) { if ( $command eq 'login' || $command eq 'logout' || $command eq 'portnum' ) { warn "$me reading data from local client\n" if $Debug; - my( @data, $dos ); + my @data; + my $dos = 0; push @data, scalar(<Client>) until $dos++ == 99 || $data[$#data] eq "END\n"; if ( $dos == 99 ) { warn "$me WARNING: DoS attempt!" |