Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
14 lines (12 sloc) 304 Bytes
use strict;
use warnings;
use Test::More tests => 1;
use Geo::Coder::Mapquest;
my $geocoder = Geo::Coder::Mapquest->new('You API key');
{
local $@;
eval {
my @locations = $geocoder->batch([ (0..101) ]);
};
like($@, qr/^too many locations- limit is 100/, 'too many locations');
}