IO::Socket::SSL::PublicSuffix(3) 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 ->
# $tld ->
my ($rest,$tld) = $ps->public_suffix('');
my $tld = $ps->public_suffix('');
# $root_domain ->
my $root_domain = $ps->public_suffix('', 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.


Returns object with builtin default. "min_suffix" can be given in %args to specify the minimal suffix, default is 1.
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.

Returns true if IDN support is available.


 Q: Why yet another module, we already have L<Domain::PublicSuffix> and
 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


Steffen Ullrich