From: ivan Date: Sun, 10 Dec 2000 21:16:26 +0000 (+0000) Subject: fix uninitialized value errors X-Git-Tag: freeside_1_3_0~51 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c328bbcdf207c83be69c9b925e597d4f92288806;hp=eefc403e7269f191637fa0b4a38b33dc8d206051 fix uninitialized value errors --- 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() until $dos++ == 99 || $data[$#data] eq "END\n"; if ( $dos == 99 ) { warn "$me WARNING: DoS attempt!"