maps.pl File Reference

Go to the source code of this file.

Functions
	our ($opt_v, $opt_t, $opt_T, $opt_l, $opt_u, $opt_d)
	getopts ('Tvtlu:d:')
	if (defined $opt_v)
	if (!defined $loc||$loc eq"")
	getstore ($url, $path) or $path
	if (!$size)
print updatetime::Last Updated on	UnixDate ("now","%b %d, %I:%M %p %Z")."\n"
Variables
use	strict
use	MapSearch
my	$name = 'Map-Download'
my	$version = 0.1
my	$author = 'Lucien Dunning'
my	$email = 'ldunning@gmail.com'
my	$updateTimeout = 10*60
my	$retrieveTimeout = 30
my	types = ('smdesc', 'updatetime', 'map')
my	$dir = "./"
my	$loc = shift
my	$results = MapSearch::doSearch()
my	$url = $results->[0]->{url}
my	$desc = $results->[0]->{description}
my	$size = $results->[0]->{imgsize}
my	$file = $desc
print smdesc::$desc	n

---

Function Documentation

our	(	$	opt_v,
		$	opt_t,
		$	opt_T,
		$	opt_l,
		$	opt_u,
		$	opt_d
	)

getopts

(

'Tvtlu:d:'

)

if

(

defined $

opt_v

)

Definition at line 21 of file maps.pl.

if

(

!defined $loc||$loc eq""

)

Definition at line 49 of file maps.pl.

getstore	(	$	url,
		$	path
	)

if

(

!$

size

)

Definition at line 65 of file maps.pl.

print updatetime::Last Updated on UnixDate	(	"now"	,
		"%b %	d,
		%I:%M%p%Z"
	)

Referenced by $time(), and if().

---

Variable Documentation

use strict

Definition at line 2 of file maps.pl.

use MapSearch

Definition at line 6 of file maps.pl.

my $name = 'Map-Download'

Definition at line 10 of file maps.pl.

my $version = 0.1

Definition at line 11 of file maps.pl.

my $author = 'Lucien Dunning'

Definition at line 12 of file maps.pl.

my $email = 'ldunning@gmail.com'

Definition at line 13 of file maps.pl.

my $updateTimeout = 10*60

Definition at line 14 of file maps.pl.

my $retrieveTimeout = 30

Definition at line 15 of file maps.pl.

my types = ('smdesc', 'updatetime', 'map')

Definition at line 16 of file maps.pl.

my $dir = "./"

Definition at line 17 of file maps.pl.

my $loc = shift

Definition at line 47 of file maps.pl.

my $results = MapSearch::doSearch()

Definition at line 55 of file maps.pl.

chomp $url = $results->[0]->{url}

Definition at line 56 of file maps.pl.

Referenced by $line(), $sw(), elsif(), and show_help().

chomp $desc = $results->[0]->{description}

Definition at line 57 of file maps.pl.

printf map::$path s $size&& $size = $results->[0]->{imgsize}

Definition at line 58 of file maps.pl.

$file = $desc

Definition at line 61 of file maps.pl.

printf map::$path s n

Definition at line 70 of file maps.pl.