summaryrefslogtreecommitdiff
path: root/t/02-fail.t
diff options
context:
space:
mode:
Diffstat (limited to 't/02-fail.t')
-rw-r--r--t/02-fail.t16
1 files changed, 16 insertions, 0 deletions
diff --git a/t/02-fail.t b/t/02-fail.t
new file mode 100644
index 0000000..72fc6da
--- /dev/null
+++ b/t/02-fail.t
@@ -0,0 +1,16 @@
+#!perl -T
+
+use Test::More tests => 1;
+use Data::Dumper;
+use Geo::USCensus::Geocoding;
+
+diag( "Testing lookup of a known nonexistent address" );
+my $result = Geo::USCensus::Geocoding->query(
+ street => '1000 Z St', # there is no Z street
+ city => 'Sacramento',
+ state => 'CA',
+ zip => '95814',
+);
+
+is( $result->matches, 0, 'number of matches' );
+