Select Code to Download

use strict;
use warnings;
...
timethis 10000:  3 wallclock secs ( 3.09 usr +  0.06 sys =  3.15 CPU) 
+@ 3174.60/s (n=10000)
# Just calc:
timethis 10000:  3 wallclock secs ( 2.95 usr +  0.00 sys =  2.95 CPU) 
+@ 3389.83/s (n=10000)

use strict;
use warnings;
...
DateTime     3258/s         --       -99%
Date::Calc 481882/s     14690%         --
$