|EBook::Tools::BISG(3pm)||User Contributed Perl Documentation||EBook::Tools::BISG(3pm)|
NAME¶EBook::Tools::BISG - Class for downloading information from the Book Industry Study Group webpages
use EBook::Tools::BISG; my $bisg = EBook::Tools::BISG->new(); $bisg->download_bisac; $bisg->save_bisac; say $bisg->bisac('fic000000'); %bisac_codes = $bisg->bisac();
This will also require a DBD of your choice. The default is to use a local SQLite store.
"new(%args)"¶Instantiates a new Ebook::Tools::BISG object.
The base url of the bisg.org website or mirror to use.
The Perl::DBI Data Source Name. Defaults to a sqlite store named bisac.sqlite in the user config directory.
"bisac($code)"¶Returns either the name matching a particular code (case-insensitive), or the hash of all BISAC codes and references with the keys in lower-case if no argument is provided.
"find($regexp)"¶Returns a list of all BISAC values (names) where either the key or the value for that entry matches a case-insensitive regular expression. If no argument is specified, or it is just '.', then the entire list is returned.
"download_bisac()"¶Downloads the BISAC codes from the BISG website and converts them into a hash. Codes and obsolete entries are lowercased and made the keys, the values will be the official names they map to.
"load_bisac()"¶Load the BISAC codes from the specified database into the hash. This is called automatically by new().
If the load fails, nothing will happen (silently!), so the only way to tell is to check to see if you have a populated hash afterwards.
"save_bisac()"¶Save the BISAC codes in the hash to the database. This will destroy any existing table named bisac_codes.
Croaks on failure.