Select Code to Download

# create a DateTime object from an ISO timestring
my $isostr = '2021-10-09T11:13:57';    # jd 2459496.96802
my $dt     = DateTime::Format::ISO8601->parse_datetime($isostr);
...
my $diff        = $end_epoch - $start_epoch;
my $hard_bottom = int($start_epoch);
$logger->info("integer bottom is $hard_bottom");

2021/10/14 13:49:52 INFO 1633518344.15928 1634095655.87543 1634741861.
+07993 1635451604.37235 1636060526.50686 
2021/10/14 13:49:52 INFO integer bottom is 1633518344