Login or Register to Ask a Question and Join Our Community

Linux and UNIX Man Pages

Linux & Unix Commands - Search Man Pages

webservice::cia::source::dbm(3pm) [debian man page]

WebService::CIA::Source::DBM(3pm)			User Contributed Perl Documentation			 WebService::CIA::Source::DBM(3pm)

NAME

       WebService::CIA::Source::DBM - An interface to a DBM copy of the CIA World Factbook

SYNOPSIS

	 use WebService::CIA::Source::DBM;
	 my $source = WebService::CIA::Source::DBM->new({
							  DBM  => 'factbook.dbm',
							  Mode => 'read'
							});

DESCRIPTION

       WebService::CIA::Source::DBM is an interface to a pre-compiled DBM copy of the CIA World Factbook.

       The module can also be used to make the DBM file, taking data from WebService::CIA::Parser (or WebService::CIA::Source::Web) and inserting
       it into a DBM.

       A script to do this - webservice-cia-makedbm.pl - should be included in this module's distribution.

METHODS

       Apart from "new", these methods are normally accessed via a WebService::CIA object.

       "new(\%opts)"
	   This method creates a new WebService::CIA::Source::DBM object. It takes a hashref of options. Valid keys are "DBM" and "Mode".

	   DBM is mandatory and should be the location of the DBM file to be used.

	   Mode is optional and can be either "read" or "readwrite". It defaults to "read".

       "value($country_code, $field)"
	   Retrieve a value from the DBM.

	   $country_code should be the FIPS 10-4 country code as defined in <https://www.cia.gov/library/publications/the-world-factbook/appen-
	   dix/appendix-d.html>.

	   $field should be the name of the field whose value you want to retrieve, as defined in <https://www.cia.gov/library/publica-
	   tions/the-world-factbook/docs/notesanddefs.html>.  (WebService::CIA::Parser also creates four extra fields: "URL", "URL - Print", "URL
	   - Flag", and "URL - Map" which are the URLs of the country's Factbook page, the printable version of that page, a GIF map of the coun-
	   try, and a GIF flag of the country respectively.)

       "all($country_code)"
	   Returns a hashref of field-value pairs for $country_code or an empty hashref if $country_code isn't in the DBM.

       "set($country_code, $data)"
	   Insert or update data in the DBM.

	   $country_code should be as described above.

	   $data is a hashref of the data to store (as Field => Value).

	   "set" overwrites any data already in the DBM under $country_code.

       "dbm()"
	   Returns a reference to the DBM file in use.

AUTHOR

       Ian Malpass (ian-cpan@indecorous.com)

COPYRIGHT

       Copyright 2003-2007, Ian Malpass

       This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

       The CIA World Factbook's copyright information page (<https://www.cia.gov/library/publications/the-world-factbook/docs/contributor_copy-
       right.html>) states:

	 The Factbook is in the public domain. Accordingly, it may be copied
	 freely without permission of the Central Intelligence Agency (CIA).

SEE ALSO

       WebService::CIA, WebService::CIA::Parser, WebService::CIA::Source::Web

perl v5.8.8							    2008-02-04					 WebService::CIA::Source::DBM(3pm)

Check Out this Related Man Page

WebService::CIA::Parser(3pm)				User Contributed Perl Documentation			      WebService::CIA::Parser(3pm)

NAME

       WebService::CIA::Parser - Parse pages from the CIA World Factbook

SYNOPSIS

	 use WebService::CIA::Parser;
	 my $parser = WebService::CIA::Parser->new;
	 my $data = $parser->parse($string);

DESCRIPTION

       WebService::CIA::Parser takes a string of HTML and parses it. It will only give sensible output if the string is the HTML for a page whose
       URL matches "https://www.cia.gov/library/publications/the-world-factbook/print/[a-z]{2}.html"

       This parsing is somewhat fragile, since it assumes a certain page structure.  It'll work just as long as the CIA don't choose to alter
       their pages.

METHODS

       "new"
	   Creates a new WebService::CIA::Parser object. It takes no arguments.

       "parse($html)"
	   Parses a string of HTML take from the CIA World Factbook. It takes a single string as its argument and returns a hashref of fields and
	   values.

	   The values are stripped of all HTML. "<br>" tags are replaced by newlines.

	   It also creates four extra fields: "URL", "URL - Print", "URL - Flag", and "URL - Map" which are the URLs of the country's Factbook
	   page, the printable version of that page, a GIF map of the country, and a GIF flag of the country respectively.

EXAMPLE

	 use WebService::CIA::Parser;
	 use LWP::Simple qw(get);

	 $html = get(
	   "https://www.cia.gov/library/publications/the-world-factbook/print/uk.html"
	 );
	 $parser = WebService::CIA::Parser->new;
	 $data = $parser->parse($html);
	 print $data->{"Population"};

AUTHOR

       Ian Malpass (ian-cpan@indecorous.com)

COPYRIGHT

       Copyright 2003-2007, Ian Malpass

       This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

       The CIA World Factbook's copyright information page (<https://www.cia.gov/library/publications/the-world-factbook/docs/contributor_copy-
       right.html>) states:

	 The Factbook is in the public domain. Accordingly, it may be copied
	 freely without permission of the Central Intelligence Agency (CIA).

SEE ALSO

       WebService::CIA

perl v5.8.8							    2008-02-04					      WebService::CIA::Parser(3pm)
Man Page