python批量下載壁紙的實現(xiàn)代碼
更新時間：2012年08月06日 15:18:29 作者：
壁紙來自桌酷網(wǎng)站,所有權(quán)歸屬其網(wǎng)站，本代碼僅做為交流學(xué)習(xí)使用，請勿用于商業(yè)用途，否則后果自負
復(fù)制代碼 代碼如下:
#! /usr/bin/env python
##python2.7-批量下載壁紙
##壁紙來自桌酷網(wǎng)站,所有權(quán)歸屬其網(wǎng)站
##本代碼僅做為交流學(xué)習(xí)使用，請勿用于商業(yè)用途，否則后果自負
##Code by Dreamlikes
import re,urllib,urllib2
#保存圖片的路徑
savepath = 'd:\\picture\\'
#壁紙集合的URL，如下
url = 'http://www.zhuoku.com/zhuomianbizhi/game-gamewall/20120503162540.htm'
urlSource = urllib.urlopen(url).read()
pattern = re.compile(r'<a href="(\d+\(\d+\)\.htm)" ', re.M | re.S)
match = pattern.findall(urlSource)
if match:
for subUrl in match:
subUrlSource = urllib.urlopen(url[0:url.rfind('/')+1]+subUrl).read()
sPattern = re.compile(r'var thunder_url = "(.*)";')
picUrl = sPattern.findall(subUrlSource)[0]
getPic = urllib2.Request(picUrl)
getPic.add_header('Referer','http://www.zhuoku.com')
f = open(savepath+picUrl[picUrl.rfind('/')+1:],'wb')
f.write(urllib2.urlopen(getPic).read())
f.close()
print "All done."
相關(guān)文章
perl是什么，干什么用的？perl原來設(shè)計者的意圖是用來處理 字符的，80%的強項是處理字符，當(dāng)然其它的很多都可以?，F(xiàn)在很多網(wǎng)頁也是用perl的，通常需要CGI環(huán)境2015-10-10
本文為大家介紹Perl中處理時間的幾個函數(shù)，供大家學(xué)習(xí)參考2013-02-02
讓apache2以cgi方式運行perl cgi程序的實現(xiàn)方法
讓apache2以cgi方式運行perl cgi程序的方法，供大家學(xué)習(xí)參考2013-02-02
這里主要討論的是當(dāng)你要傳遞的參數(shù)不是僅僅一個的時候，也就是兩個以上，并且他們數(shù)據(jù)的類型還不一致的時候，我們要遇到的問題2013-03-03
這篇文章主要介紹了Perl中的子程序?qū)W習(xí)筆記,本文講解了子程序的定義、調(diào)用、返回值、局部變量、子程序參數(shù)傳遞等內(nèi)容,需要的朋友可以參考下2015-02-02
處理生物數(shù)據(jù)時，常常需要行列置換，這在R里面異常的簡單容易，一個t()就解決了2013-02-02
這篇文章主要介紹了Perl一句話命令行編程中常用參數(shù)總結(jié),本文總結(jié)了如-e、-E、-M、-m等參數(shù),并講解了它們的作用及用法,需要的朋友可以參考下2014-09-09
哈希在perl是非常重要且常用的，本文為大家介紹一些常見的用法，供大家學(xué)習(xí)參考2013-02-02
Perl的Mail::POP3Client模塊和Gmail通信實例
這篇文章主要介紹了Perl的Mail::POP3Client模塊和Gmail通信實例,本文直接給出實現(xiàn)代碼,需要的朋友可以參考下2015-05-05
本文向大家簡單介紹一下Perl split函數(shù)的用法，Perl中的一個非常有用的函數(shù)是Perl split函數(shù)-把字符串進行分割并把分割后的結(jié)果放入數(shù)組中2013-02-02