alias torsocks='torsocks -i'

torsocks() { command torsocks -i "$@"; }

HEAD / HTTP/1.1

Host:

User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:10.0) Gecko/20150101 Firefox/47.0 (Chrome)

Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8

Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7

Accept-Language: en-us,en;q=0.5

Accept-Encoding: gzip, deflate

Connection: close

http://sslproxies24.blogspot.com.tr/

http://proxyserverlist-24.blogspot.com.tr/

http://www.vipsocks24.net/

http://www.socks24.org/

http://socksproxylist24.blogspot.com.tr/

http://msocks5.blogspot.com.tr/

http://free-proxy-list.net/

http://www.sslproxies.org/

http://www.us-proxy.org/

http://free-proxy-list.net/uk-proxy.html

http://www.socks-proxy.net/

http://www.google-proxy.net/

http://free-proxy-list.net/anonymous-proxy.html

http://proxyapi.cf/y@n1@p1/usa

http://proxyapi.cf/y@n1@p1/ssl

http://proxyapi.cf/y@n1@p1/uk

http://proxyapi.cf/y@n1@p1/socks

http://proxyapi.cf/y@n1@p1/google

http://proxyapi.cf/y@n1@p1/anonymous

http://50kproxies.com/10-february-10-02-new-fresh-daily-50000-proxy-list-50kproxies-com/

http://50kproxies.com/11-january-11-01-new-fresh-daily-50000-proxy-list-50kproxies-com/

http://50na50.net/

http://50na50.net/proxy/httplist

http://aliveproxy.com/anonymous-proxy-list

http://aliveproxy.com/ca-proxy-list

http://aliveproxy.com/de-proxy-list

http://aliveproxy.com/fastest-proxies

http://aliveproxy.com/fr-proxy-list

http://aliveproxy.com/gb-proxy-list

http://aliveproxy.com/high-anonymity-proxy-list

http://aliveproxy.com/jp-proxy-list

http://aliveproxy.com/proxy-list-port-3128

http://aliveproxy.com/proxy-list-port-80

http://aliveproxy.com/proxy-list-port-8000

http://aliveproxy.com/proxy-list-port-8080

http://aliveproxy.com/proxy-list-port-81

http://aliveproxy.com/ru-proxy-list

http://aliveproxy.com/us-proxy-list

http://atomintersoft.com/anonymous_proxy_list

http://atomintersoft.com/high_anonymity_elite_proxy_list

http://atomintersoft.com/products/alive-proxy/proxy-list

http://atomintersoft.com/products/alive-proxy/proxy-list?ap=9

http://atomintersoft.com/products/alive-proxy/proxy-list/3128

http://atomintersoft.com/products/alive-proxy/proxy-list/com

http://atomintersoft.com/products/alive-proxy/proxy-list/high-anonymity/

http://atomintersoft.com/products/alive-proxy/socks5-list

http://atomintersoft.com/proxy_list_domain_com

http://atomintersoft.com/proxy_list_domain_edu

http://atomintersoft.com/proxy_list_domain_net

http://atomintersoft.com/proxy_list_domain_org

http://atomintersoft.com/proxy_list_port_3128

http://atomintersoft.com/proxy_list_port_80

http://atomintersoft.com/proxy_list_port_8000

http://atomintersoft.com/proxy_list_port_81

http://atomintersoft.com/transparent_proxy_list

http://best-proxy.com/english/search.php?search=anonymous-and-elite&country=any&type=anonymous-and-elite&port=any&ssl=any

http://best-proxy.com/english/search.php?search=anonymous-and-elite&country=any&type=anonymous-and-elite&port=any&ssl=any&p=2

http://best-proxy.com/english/search.php?search=anonymous-and-elite&country=any&type=anonymous-and-elite&port=any&ssl=any&p=3

http://bestproxy.narod.ru/proxy2.html

http://checkerproxy.net/all_proxy

http://ejohn.org/apps/anon/

http://guncelproxy.com/Anasayfa/

http://multiproxy.org/anon_proxy.htm

http://multiproxy.org/txt_all/proxy.txt

http://nntime.com/proxy-list-01.htm

http://nntime.com/proxy-list-02.htm

http://nntime.com/proxy-list-03.htm

http://nntime.com/proxy-list-04.htm

http://nntime.com/proxy-list-05.htm

http://nntime.com/proxy-list-06.htm

http://nntime.com/proxy-list-07.htm

http://nntime.com/proxy-list-08.htm

http://nntime.com/proxy-list-09.htm

http://nntime.com/proxy-list-10.htm

http://nntime.com/proxy-list-11.htm

http://nntime.com/proxy-list-12.htm

http://nntime.com/proxy-list-13.htm

http://nntime.com/proxy-list-14.htm

http://nntime.com/proxy-list-15.htm

http://nntime.com/proxy-list-16.htm

http://nntime.com/proxy-list-17.htm

http://nntime.com/proxy-list-18.htm

http://nntime.com/proxy-list-19.htm

http://nntime.com/proxy-list-20.htm

http://nntime.com/proxy-list-21.htm

http://nntime.com/proxy-list-22.htm

http://nntime.com/proxy-list-23.htm

http://nntime.com/proxy-list-24.htm

set skip on lo

block log

pass out inet proto tcp user _tor

BEGIN
{
    srand();
}

{
    split($3, host, ":");
    bytes = int(rand() * 10) + 1;
    data = ("dd if=/dev/urandom bs=1 count=" bytes " 2>/dev/null");
    r = system(data "|nc " host[1] " " host[2]);
    if (! r) print;
}

function int_to_ip(n)
{
    if (n == 0) return;
    prev = int_to_ip(rshift(n,8));
    return (prev) (prev ? "." : "") n % 256;
}

function ip_to_int(ip)
{
    split(ip, parts, ".");
    return parts[1] * 16777216 + parts[2] * 65536 + parts[3] * 256 + parts[4];
}
        

function ipn_lookup(ip)
{
    while (1)
    {
        stat = getline s < TOR_GEOIP;
        if (stat != 1)
        {
            close(TOR_GEOIP);
            return;
        }
        if (substr(s, 1, 1) == "#") continue;
        split(s, ary, ",");
        fst = int(ary[1]);
        snd = int(ary[2]);
        if ((fst <= ip) && (ip <= snd))
        {
            close(TOR_GEOIP);
            return ary[3];
        }
    }
}

function ip_lookup(ip)
{
    return ipn_lookup(ip_to_int(ip));
}

#BEGIN {print ip_lookup("1.0.0.1");
#    print ip_lookup("666.666.666.666");}

BEGIN
{
    TOR_GEOIP = "/usr/share/tor/geoip";
}   

{
    split($3, host, ":");
    if (host[1])
    {
        print ip_lookup(host[1]);
    }
}

module Main where
import Network.Curl
import Control.Concurrent
import Data.Maybe
--import Threads

get proxy = curlGetString "https://twitter.com" [CurlProxy proxy,
                                                 CurlTimeout 5]

check curloutput = fst curloutput == CurlOK

thrputStrLn iolock string = do putMVar iolock 1
                               putStrLn string
                               _ <- takeMVar iolock
                               return ()
  

threadProcessProxy invar osync = do work <- (takeMVar invar)
                                    if isJust work then
                                      do processProxy (fromJust work) osync
                                         threadProcessProxy invar osync
                                      else
                                      return ()


processProxy proxy osync = do got <- get proxy
                              if check got then
                                thrputStrLn osync proxy
                                else return ()

--processProxies [] = return ()
--processProxies (x:xs) = do processProxy x
--                           processProxies xs
spawnThreads 0 fn = return ()
spawnThreads n fn = do forkIO fn
                       spawnThreads (n - 1) fn

--main = do cont <- getContents
--          let lins = lines cont in
--            sequence $ map processProxy lins
--main = putStrLn ""
threads :: Int
threads = 20 -- may be 100 or even more.

main = do work <- newEmptyMVar
          osync <- newEmptyMVar
          spawnThreads Threads.threads (threadProcessProxy work osync)
          cont <- getContents
          let lins = lines cont in
            sequence $ map (putMVar work) (map Just lins)
          sequence $ map (putMVar work) $ take (Main.threads) $ cycle [Nothing]

 support, so some syntax may be garbled.

And it looks like this board eats all the spaces in the code.
So that Haskell source in on https://paste.ubuntu.com/p/WMxv7sc5WW/ now.

I don`t have any particular ideas. Just want to learn to code.

>Endware them / add them to the collection
Consider these scripts being in public domain. Feel free to include them anywhere you want.