return sqrt( ($x2 - $x1)**2 + ($y2 - $y1)**2 + ($z2 - $z1)**2 );

##</code><code>##

my $dx = $x2 - $x1;
my $dy = $y2 - $y1;
my $dz = $z2 - $z1;

return sqrt( $dx**2 + $dy**2 + $dz**2 );

##</code><code>##

return sqrt( $x**2 + $y**2 + $z**2 );