$bits >>= 24;
$key = ($key ^ $bits);
}
- $key = $key & 0x3fffffff;
+ $key = $key & 0x0fffffff;
my $client = $self->{'auth'} ||= $Auth->new;
my $r_requestChallenge = $client->requestChallenge({
perldoc Geo::EZLocate
-This library is not supported by TomTom.
+This library is not supported by TomTom. Commercial support is available
+from Freeside Internet Services, L<http://www.freeside.biz>.
=head1 LICENSE AND COPYRIGHT
See http://dev.perl.org/licenses/ for more information.
-
=cut
1; # End of Geo::EZLocate