Pasted

cat << "EOF"
             ____   ____ ___  ____  _____   _   _ _____ _____ 
            | __ ) / ___/ _ \|  _ \| ____| | \ | | ____|_   _|
            |  _ \| |  | | | | | | |  _|   |  \| |  _|   | |  
            | |_) | |__| |_| | |_| | |___ _| |\  | |___  | |  
            |____/ \____\___/|____/|_____(_)_| \_|_____| |_|  
 
                Reverseip (http://viewdns.info/api/)
                CODE By CCOCOT
                Thank For Zombie-root
EOF
 
if [ -z $1 ]; then
    printf "\n To Use $0 <file.txt>"
    exit 1
fi
 
get_target(){
 
    gocurl=$(curl -s "http://viewdns.info/reverseip/?host=${1}&t=1" | grep -Po "(?<=<td>)[^<]*")
    for URL in $gocurl; do
        printf "[+] ${URL}\n"
        echo ${URL} >> web.txt
    done
}
 
persend=50
setleep=5
 
itung=0
 
IFS=$'\r\n' GLOBIGNORE='*' command eval 'web=($(cat $1))'
for (( i = 0; i < ${#web[@]}; i++ )); do
 
    set_kirik=$(expr $itung % $persend)
    if [[ $set_kirik == 0 && $itung > 0 ]]; then
        sleep $setleep
    fi
 
    printf "\nTry ${web[$i]} ... \n"
    get_target ${web[$i]} &
    itung=$[itung+1]
 
done
wait