Performing math on perl variables...
Posted on 2003-03-03
I have perl code that opens a flat data file and
reads in two colmuns of numbers. The code to do
this is as follows:
#example of data being read in:
# lmbhux03:GBL_CPU_TOTAL_UTIL lmbhux03:GBL_CPU_IDLE_UTIL
#01/01/03 09:00 Wed 88.600 11.390
#01/02/03 09:00 Thu 44.880 55.100
seek(infile,80,0); #mv pointer 80 bytes from 0 to start 1st true record.
seek(infile,23,1); #mv pointer 80 bytes from the last pointer
$t1=$time+12.0; #t1 is not working!!!
print ("time1= ***$time1*** - > $time1 + 12=$t1\n");
seek(infile,40,1); #mv pointer 80 bytes from the last pointer
As you can see in the above, the variable "t1" is not
working. Is this because it is floating point data?