my $distance = sqrt(($x1-$x2)**2+($y1-$y2)**2);