my $d2 = $s3 - $s2 + ($m3 - $m2) / 1_000_000;

##</code><code>##

(my $d2 = (($s3 - $s2) + (($m3 - $m2) / 1000000)));