Ok, I went through and ran every line of the code it said to do. on the first line, lwp-download... I got an error saying this:
lwp-download: Aborted
Will not save <http://tjmather.com/Geo-PostalCode_19991101.txt.gz> as
+"Geo-PostalCode\x5f19991101.txt.gz".
Please override file name on the command line.
so I did it like this:
wget http://tjmather.com/Geo-PostalCode_19991101.txt.gz then did the rest like it said. I manually saved and uploaded all the installation files from here: http://search.cpan.org/src/TJMATHER/Geo-PostalCode-0.06/
When I uploaded them the files in /t that end with .t somehow ended up with .t.txt file names so I had to rename those.
After all was said and done, I did a test with this code:
use Geo::PostalCode;
my ($lat, $lon, $city, $state, $distance, $_record, $_db_dir, $gp,
+ $_zip);
$_db_dir = "/etc/zip/edgetest";
$gp = Geo::PostalCode->new(db_dir => $_db_dir) or die "Could not c
+reate a New Instance!";
$_zip = param("zip");
$_record = $gp->lookup_postal_code('postal_code' => "$_zip") or di
+e "Could not Lookup Postal Code!";
$lat = $_record->{lat};
$lon = $_record->{lon};
$city = $_record->{city};
$state = $_record->{state};
$distance = $gp->calculate_distance(postal_codes => ["$_zip",'7485
+1']) or die "Could not get distance 3!";
$postal_codes = $gp->nearby_postal_codes(lat => $lat, lon =>
+ $lon,
distance => 50);
$_page_content .= qq~<br>
City is ~ . $city . qq~<br>
State is ~ . $state . qq~<br>
Latitude is ~ . $lat . qq~<br>
Longitude is ~ . $lon . qq~<br>
<br>
Nearby Zips are: ~ . @$postal_codes . qq~<br>
<br>
The Distance from $_zip to US is $distance miles<br>
<br>~; # $_page_content is printed at the end of
# the index.cgi file for the
# content...
I added the 'die' parts for debugging because it was not working. I am getting this message: Could not Lookup Postal Code! So it is failing at this part of the code:
$_record = $gp->lookup_postal_code('postal_code' => "$_zip") or die "Could not Lookup Postal Code!";
Can you see a reason why this would not be working and failing at that location?
Thanks for any further assistance you can be. I will appreciate any and all advice on the matter.
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.