Pasted

cat << "EOF"
             ____   ____ ___  ____  _____   _   _ _____ _____
            | __ ) / ___/ _ \|  _ \| ____| | \ | | ____|_   _|
            |  _ \| |  | | | | | | |  _|   |  \| |  _|   | |  
            | |_) | |__| |_| | |_| | |___ _| |\  | |___  | |  
            |____/ \____\___/|____/|_____(_)_| \_|_____| |_|  
 
                Reverseip
                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://www.ipfingerprints.com/scripts/getReverseIP.php" -d "remoteHost=${1}" | grep -Po "(?<=\">)[^<]*")
    IFS=' ' read -r -a target <<< $gocurl
    for i in "${!target[@]}"; do
        printf "[+] ${target[$i]}\n"
        echo ${target[$i]} >> web.txt
    done
}
 
persend=20
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