Rand Stats

Net::Whois

zef:FRITH

Actions Status

NAME

Net::Whois - Raku interface to the Whois service

SYNOPSIS

use Net::Whois;

my Net::Whois $w .= new;
my %h = $w.query: $who, $using;
for %h.kv -> $k, $v { say "$k => $v[*]" }

DESCRIPTION

Net::Whois is an interface to the Whois service

This is a very simple module that does what I just happened to need.

new()

The constructor takes no arguments.

multi method query(Str:D $who where { $_ ~~ IP | Domain or die 'Not a valid IP or domain name' }, Str:D $server, Bool :$raw! --> List)

multi method query(Str:D $who where { $_ ~~ IP | Domain or die 'Not a valid IP or domain name' }, Str:D $server, Bool :$multiple --> Hash)

multi method query(Str:D $who where { $_ ~~ IP | Domain or die 'Not a valid IP or domain name' }, *@servers, Bool :$multiple, Bool :$raw --> Hash)

The first form of the method looks for the $who domain, using the chosen $server and returns a List of values. If the :$raw flag is used then the result is returned verbatim.

The second form returns a Hash of the whois fields. The whois output may consist of several sections; if the :$multiple flag is used the values of the same-named field are concatenated into the same value string.

The third form takes a list of servers to query. It returns a Hash whose keys are the name of the server and the values are the hashes returned by the second form of the method, or the lists returned by the first form of the method if the :$raw flag has been used.

Installation

To install it using zef (a module management tool):

$ zef install Net::Whois

AUTHOR

Fernando Santagata nando.santagata@gmail.com

COPYRIGHT AND LICENSE

Copyright 2023 Fernando Santagata

This library is free software; you can redistribute it and/or modify it under the Artistic License 2.0.