IO::Socket::SSL::PublicSuffix - provide access to Mozilla’s list of effective TLD names
# use builtin
default
use IO::Socket::SSL::PublicSuffix;
$ps = IO::Socket::SSL::PublicSuffix->default;
# load from string
$ps =
IO::Socket::SSL::PublicSuffix->from_string("*.uk\n*");
# load from file or file handle
$ps =
IO::Socket::SSL::PublicSuffix->from_file($filename);
$ps = IO::Socket::SSL::PublicSuffix->from_file(\*STDIN);
# --- string in -> string out
# $rest -> whatever.host
# $tld -> co.uk
my ($rest,$tld) =
$ps->public_suffix('whatever.host.co.uk');
my $tld = $ps->public_suffix('whatever.host.co.uk');
# $root_domain -> host.co.uk
my $root_domain =
$ps->public_suffix('whatever.host.co.uk', 1);
# --- array in -> array out
# $rest -> [qw(whatever host)]
# $tld -> [qw(co uk)]
my ($rest,$tld) = $ps->public_suffix([qw(whatever host co
uk)]);
----
# To update this file with the current list:
perl -MIO::Socket::SSL::PublicSuffix -e
'IO::Socket::SSL::PublicSuffix::update_self_from_url()'
This module uses the list of effective top level domain names from the mozilla project to determine the public top level domain for a given hostname.
Method
class->default(%args)
Returns object with builtin default. "min_suffix" can be given in %args to specify the minimal suffix, default is 1.
class->from_string(string,%args)
Returns object with configuration from string. See method "default" for %args.
class->from_file( file name| file handle, %args )
Returns object with configuration from file or file handle. See method "default" for %args.
$self->public_suffix( $host|\@host, [ $add ] )
In array context the function returns the non-tld part and the tld part of the given hostname, in scalar context only the tld part. It adds $add parts of the non-tld part to the tld, e.g. with "$add=1" it will return the root domain.
If there were no explicit matches against the public suffix configuration it will fall back to a suffix of length 1.
The function accepts a string or an array-ref (e.g. host split by "."). In the first case it will return string(s), in the latter case array-ref(s).
International hostnames or labels can be in ASCII ( IDNA form starting with "xn--") or unicode. In the latter case an IDNA handling library like Net::IDN:::Encode, Net::LibIDN or recent versions of URI need to be installed.
($self|class)->can_idn
Returns true if IDN support is available.
http://publicsuffix.org/list/effective_tld_names.dat
Domain::PublicSuffix, Mozilla::PublicSuffix
Q: Why yet
another module, we already have
L<Domain::PublicSuffix> and
L<Mozilla::PublicSuffix>.
A: Because the public suffix data change more often than
these modules do,
IO::Socket::SSL needs this list and it is more easy this way
to keep it
up-to-date.
Steffen Ullrich