in reply to Problem subtracting in Perl

Also we found the problem first after about 60 lines of data. As more lines of data are input the worse the problem gets. The above sample is from 6000 lines of data.