short Perl script to check domain availability from command line