From e33b3f4ae5f63db6f734ef38049092911ea9961b Mon Sep 17 00:00:00 2001
From: Mark Wells <mark@freeside.biz>
Date: Thu, 17 Nov 2016 00:57:40 -0800
Subject: initial version

---
 t/01-lookup.t | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 t/01-lookup.t

(limited to 't/01-lookup.t')

diff --git a/t/01-lookup.t b/t/01-lookup.t
new file mode 100644
index 0000000..937dca6
--- /dev/null
+++ b/t/01-lookup.t
@@ -0,0 +1,16 @@
+#!perl
+
+use Test::More tests => 1;
+use Data::Dumper;
+use Geo::USCensus::TIGERweb;
+
+diag( "Testing lookup of a census block" );
+my $result = Geo::USCensus::TIGERweb->census_block_at_point(
+  lat => 38.578793,
+  lon => -121.48778,
+  debug => 1,
+);
+
+ok( $result, 'Found a census block');
+diag($result);
+
-- 
cgit v1.2.1