PERL script giving data from kalman filter in cloudy and optimal conditions