X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Fimport-did-inventory;h=01fa2e8af8a1cc3d5930436b0f34c482268e2563;hp=298e159f4b64011ea915a4df2786aa05f84e955f;hb=f73a37bd1dfd6f8e5cd497b8ac2843a7b8b1247b;hpb=e4ddd58aa20702f35734537cf7fe30f0a9acc920 diff --git a/bin/import-did-inventory b/bin/import-did-inventory old mode 100644 new mode 100755 index 298e159f4..01fa2e8af --- a/bin/import-did-inventory +++ b/bin/import-did-inventory @@ -94,11 +94,12 @@ $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' ); + $dt = "$dt 00:00:00"; my $epoch = $parser->parse_datetime($dt); - warn "dt=$dt min=$min max=$max epoch=$epoch\n"; + 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)");