NAME¶
Net::Google::SafeBrowsing2::MySQL - MySQL as back-end storage for the Google
Safe Browsing v2 database
SYNOPSIS¶
use Net::Google::SafeBrowsing2::MySQL;
my $storage = Net::Google::SafeBrowsing2::MySQL->new(host => '127.0.0.1', database => 'GoogleSafeBrowsingv2');
...
$storage->close();
DESCRIPTION¶
This is an implementation of Net::Google::SafeBrowsing2::Storage using MySQL.
CONSTRUCTOR¶
new()¶
Create a Net::Google::SafeBrowsing2::MySQL object
my $storage = Net::Google::SafeBrowsing2::MySQL->new(
host => '127.0.0.1',
database => 'GoogleSafeBrowsingv2',
username => 'foo',
password => 'bar'
);
Arguments
- host
- Required. MySQL host name
- database
- Required. MySQL database name to connect to.
- username
- Required. MySQL username.
- password
- Required. MySQL password.
- port
- Optional. MySQL port number to connect to.
- keep_all
- Optional. Set to 1 to keep old information (such as expiring full hashes)
in the database. 0 (delete) by default.
PUBLIC FUNCTIONS¶
See Net::Google::SafeBrowsing2::Storage for a complete
list of public functions.
close()¶
Cleanup old full hashes, and close the connection to the database.
$storage->close();
CHANGELOG¶
- 0.5
- Keep empty sub chunks. Shorten prefixes greater than 8 bytes (workaround
tro keep schema tight)
- 0.4
- Add option keep_all to keep expired full hashes. Useful for
debugging.
- 0.3
- Use more efficient add_chunk_a and add_chunk_s functions. Change data type
for prefixes from VARCHAR to VARBINARY.
SEE ALSO¶
See Net::Google::SafeBrowsing2 for handling Google Safe Browsing v2.
See Net::Google::SafeBrowsing2::Storage for the list of public functions.
See Net::Google::SafeBrowsing2::Sqlite for a back-end using Sqlite.
Google Safe Browsing v2 API:
<
http://code.google.com/apis/safebrowsing/developers_guide_v2.html>
AUTHOR¶
Julien Sobrier, <jsobrier@zscaler.com> or <julien@sobrier.net>
COPYRIGHT AND LICENSE¶
Copyright (C) 2011 by Julien Sobrier
This library is free software; you can redistribute it and/or modify it under
the same terms as Perl itself, either Perl version 5.8.8 or, at your option,
any later version of Perl 5 you may have available.