LinuxÒÁµéÔ°ÂÛ̳'s Archiver

twf_cc ·¢±íÓÚ 2008-3-28 19:41

ƒÉ‚€È¡µÃproxy µÄº††Îscript

Ó²¾Ž´aµÄ£¬Èç¹û¾W˜I¸Ä„Ó¾ÍʧЧ, ÆäÖÐÒ»‚€ß^žV²»±M›]‡ø¼ÒµÄÐУ¬µ«¿ÉÓÃ
ƒÉ‚€¶¼ÒªÓà curl

ß@‚€È¡µÃ web proxy µÄ

[code]

#! /bin/bash
#Usage: $0
proxy_url='http://www.proxyfreelist.com/'
user_agent="Mozilla/5.0"

   curl -A "$user_agent" $proxy_url |\
    gawk '{  
             if (/^<a href="http:.+/){
             gsub(/\<target=.+$/, "")
             gsub(/<a href="/, "")
             sub(/"/, "")
             print
             }
           }'

[/code]

ß@‚€È¡µÃ proxy4free ×îеÄÈýí“ , Èç¹û›] curl , ¿ÉÓà wget, µ«Ò»¶¨Òª°Ñ User-Agent ÔO³É Mozilla/5.0 »òÆäËû
¾WÕ¾ÔO¶¨Á˲»ÔS wget ÏÂÝd

[code]
#! /bin/bash
# Usage: $0
i=1
printf "%-20s" Ip Port Type Country Date ; echo ""
printf "%*s\n" 90 | tr ' ' '_'
  while (( i <= 3 ))
    do
       curl -A "Mozilla/5.0" "http://www.proxy4free.com/page$i.html"
       ((i++))
       sleep 1
    done | gawk  '
                 $0 ~ /^<td>.+<\/td>$/ && $0 !~ /[Ww]hois/{
                 gsub(/<[^>]+>/, "")
                 gsub(/^Site 0?1?[0-9]?$/, "")
                 gsub(/([nN]ame|IP|Port|Type|Country|(Last Test))/, "")
                 gsub(/Sites of the ([Hh]our|[dD]ay|[[Ww]eek)/, "")
                 sub(/copyright .+2002-2007 proxy4free.com/, "")
                 if (/^$/) next  
                 if (/^[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+/) printf("\n")      
                 if (/^.+$/) {
                 printf("%-20s", $0 )
                    }
                   }' | gawk '{if (NF < 5 )next;  print $0}'
[/code]

º††Îµ«¶¼¿ÉÓ㬲»ÓÃé_žgÓ[Æ÷ , ß@ÎÒ³£ÓõÄscript  :lol ,

[[i] ±¾Ìû×îºóÓÉ twf_cc ÓÚ 2008-3-28 19:43 ±à¼­ [/i]]

twf_cc ·¢±íÓÚ 2008-3-29 00:42

¸ÄÉÆµÚ¶þ‚€£¬Ô“›]†–î}ÁË

[code]

#! /bin/bash

i=1
printf "%-20s" Ip Port Type Country Date ; echo ""
printf "%*s\n" 90 | tr ' ' '_'
  while (( i <= 3 ))
    do
       curl -A "Mozilla/5.0" -s "http://www.proxy4free.com/page$i.html"
       ((i++))
       sleep 1
    done | gawk  '
                 $0 ~ /^<td>.+<\/td>$/ && $0 !~ /[Ww]hois/{
                 gsub(/<[^>]+>/, "")
                 gsub(/^Site 0?1?[0-9]?$/, "")
                 gsub(/([nN]ame|IP|Port|Type|Country|(Last Test))/, "")
                 gsub(/Sites of the ([Hh]our|[dD]ay|[Ww]eek)/, "")
                 sub(/copyright .+2002-2007 proxy4free.com/, "")
                 if (/^$/) next  
                 if (/^[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+/) printf "\n"      
                 if (/^.+$/) {
                 printf "%-20s", $0
                    }
                   }' |gawk 'NF > 4{print $0}'

[/code]

Ò³: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.