X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_sesmon%2FFS-SessionClient%2Ffs_sessiond;h=bfdb20a1dc4b3dbfb6a11d98e957e6e67e7c782b;hb=c0c6e34a0818945d86165b47adcddfea91f3f7e4;hp=d7284b252c5237d334d8572a321e72cbe9c7dab5;hpb=b90f8cdac9371c219a72dda16f8deecc7c44fc28;p=freeside.git

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!"