error message

[Geetha Weerasooriya]

Dear All,
 
In my perl code for MapMatching, I have following while loop. When I run
the program I get the following two error messages(for each data line in
the data file)
But the out put file is created.
 
Use of uninitialized value in int at filename.pl lineNo, <DATA> line ..
Use of unititialized value in multiplication(*) at filename.pl lineNo,
<DATA> line ..
 
The errors refer to the lines  in bold in the code
 
Can you please  teach me where the error is?
 
Kind regards,
 
Geetha
 
 
 
while(<DATA>)  {
            chop;
            s/\s//g;
 
/\d+\/\d+\/\d+,\d+:\d+:\d+,\d+,(\d+\.*\d*),(\d+\.*\d*),\d+,\d+,\d+,\d+\.
*\d*,\d+$/
                        or die "Error in mtchSq2Route.pl! bad format in
SQ record.\n$_\n";
            $lngi_bgn = $1;
            $lati_bgn = $2;
                       
             my ($rt1,$dist1,$pos1) = &getFootPointDistToRoot($lngi_bgn,
$lati_bgn);
                        
             $pos1 = int($pos1);
             $dist1 = int($dist1*100)/100;
              
            print "$_,$rt1->{ID},$pos1,$dist1\n";