diff options
| -rw-r--r-- | bin/import-did-inventory | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/bin/import-did-inventory b/bin/import-did-inventory index a0ffb81..19cef8c 100644 --- a/bin/import-did-inventory +++ b/bin/import-did-inventory @@ -98,6 +98,7 @@ my $parser = new DateTime::Format::Natural( 'time_zone' => 'local' ); sub parsedt { my ($dt,$min,$max) = (shift,shift,shift); my $epoch = $parser->parse_datetime($dt); + warn "dt=$dt min=$min max=$max epoch=$epoch\n"; return $epoch->epoch if ($parser->success && $epoch->epoch >= $min && $epoch->epoch <= $max); fatal("invalid date $dt (min=$min, max=$max)"); |