DID inventory/import / bulk DID orders - phase 2, RT12754
authorlevinse <levinse>
Wed, 15 Jun 2011 23:40:33 +0000 (23:40 +0000)
committerlevinse <levinse>
Wed, 15 Jun 2011 23:40:33 +0000 (23:40 +0000)
bin/import-did-inventory

index a0ffb81..19cef8c 100644 (file)
@@ -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)");