iwhois 435 B

1234567891011121314151617181920212223
  1. #!/bin/rc
  2. switch($1){
  3. case *@*
  4. person=`{echo $1|sed s/@.*//}
  5. machine=`{echo $1|sed s/.*@//}
  6. case *
  7. person=$1
  8. machine=rs.internic.net
  9. }
  10. fn boilerplate {
  11. tail -r $1|sed '/agree to/,$d'|tail -r
  12. }
  13. file=/tmp/iwhois$pid
  14. echo ''$person'' | telnet -n tcp!$machine!whois > $file
  15. x=`{ sed -n 's/.*Whois Server: (.*)/\1/p' $file }
  16. switch($x){
  17. case ''
  18. ;
  19. case *
  20. echo ''$person'' | telnet -n tcp!$x!whois > $file
  21. }
  22. boilerplate $file
  23. rm $file