February 2006
Intermediate to advanced
304 pages
6h 16m
English
With this program, the user can view and print topographical maps and aerial photographs of any place in the United States. Its job is to take the data from the mapping module and display it in a way you can use it.
1 use strict; 2 use warnings; 3 4 use Tk; 5 use Geo::Coordinates::UTM; 6 use HTTP::Lite; 7 use Tk::Photo; 8 use Tk::JPEG; 9 use Tk::LabEntry; 10 use Tk::BrowseEntry; 11 use Image::Magick; 12 13 use map; 14 use goto_loc; 15 16 my $tk_mw; # Main window 17 my $tk_canvas; # Canvas on the main window 18 my $tk_nav; # Navigation window 19 20 my $goto_long = 0; # Where to go from the entry 21 my $goto_lat = 0; 22 23 # The buttons to display the scale 24 my @tk_scale_buttons; 25 26 ################################################ ...