SYNOPSIS

     use Dist::Util::Debian qw(
         dist2deb
         deb_exists
         dist_has_deb
     );
    
     say dist2deb("HTTP-Tiny"); # -> libhttp-tiny-perl
    
     say dist_has_deb("HTTP-Tiny"); # -> 1
     say dist_has_deb("Foo");       # -> 0

DESCRIPTION

FUNCTIONS

 dist2deb($dist, ...) => list

    It uses the simple rule of turning $dist to lowercase and adds "lib" +
    "-perl" prefix and suffix. A small percentage of distributions do not
    follow this rule.

 deb_exists([ \%opts, ] $deb) => bool

 dist_has_deb([ \%opts, ] $dist, ...) => bool|list

    Return true if distribution named $dist has a corresponding Debian
    package. Currently the way the routine checks this is rather naive: it
    checks the corresponding Debian package against this URL:
    https://packages.debian.org/sid/$package.

    Will warn and return undef on error, e.g. the URL cannot be checked or
    does not contain negative/positive indicator of existence.

    Can accept multiple dists and will return a list of bools in that case.

    Known options:

      * use_allpackages => bool

      If you need to check a lot of distributions (hundreds or more) then
      the default way of checking each distribution against a URL might be
      too slow. An alternative way, enabled if you set this option to true,
      is to download
      https://packages.debian.org/unstable/allpackages?format=txt.gz (at
      the time of this writing, Jan 2017, the size is about 1.7M) then
      parse it locally. The file will be cached to a temporary file and
      reused for a day.

      Function will return undef if the allpackages index cannot be
      donwloaded.