Hébergement
Forum
#!/bin/awk -f BEGIN { RS="<" proxy="VOTRE PROXY " port="ET SON PORT" } # <a href="http:// ... /^(a|A) .*(h|H)(r|R)(e|E)(f|F) *="?http:\/\// { sub(/^(a|A) .*(h|H)(r|R)(e|E)(f|F) *="?http:\/\//,"",$0) match($0,/[^" ]+("| )?/) link = substr($0,RSTART,RLENGTH-1) sub(/\//," /",link) links[link]=1 next } END { for ( i in links ) { system("client " proxy " " port " " i ) getline < "entete" sub(/n.*$/,"") print "----> "i " ---------- " $0 close("entete") } }