crawler-bin/whoishu

   1 #!/bin/bash
   2
   3
   4 domain_tld=$1
   5 domain=${domain_tld%.*}
   6 expr "$domain" : ".*\\." >/dev/null && tld=${domain_tld##*.}
   7
   8 url="http://www.domain.hu/domain/domainsearch/"
   9 request="domain=$domain&tld=${ltd:-hu}"
  10
  11 curl -s "$url?$request" \
  12         | iconv -f latin2 -t utf8 \
  13         | perl -ne '
  14                 if(/ns=([0-9a-z\.]+)/) {
  15                         print $1."\t";
  16                 }
  17                 if(/class=list2/) {
  18                         s/(<[^>]+>)+/\t/g;
  19                         s/^\s+|\s+$//g;
  20                         /--(.*)$/;
  21                         $_=$1;
  22                         s/^\s+|\s+$//g;
  23                         print $_;
  24                 }
  25         '
  26         echo    # NL
  27
  28 #curl -s "$url?$request"
  29