perl -MNet::Whois::Raw -e "print whois(\"lexicon.co.uk\")"