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

index 19cef8c..298e159 100644 (file)
@@ -94,9 +94,9 @@ $latas{460} = 'SOUTHEAST FL GR-EA';
 $latas{952} = 'TAMPA FLORIDA';
 $latas{524} = 'KANSAS CITY';
 
-my $parser = new DateTime::Format::Natural( 'time_zone' => 'local' );
 sub parsedt {
     my ($dt,$min,$max) = (shift,shift,shift);
+    my $parser = new DateTime::Format::Natural( 'time_zone' => 'local' );
     my $epoch = $parser->parse_datetime($dt);
     warn "dt=$dt min=$min max=$max epoch=$epoch\n";
     return $epoch->epoch