手机
当前位置:查字典教程网 >脚本专栏 >perl >python批量下载壁纸的实现代码
python批量下载壁纸的实现代码
摘要:复制代码代码如下:#!/usr/bin/envpython##python2.7-批量下载壁纸##壁纸来自桌酷网站,所有权归属其网站##本代...

复制代码 代码如下:

#! /usr/bin/env python

##python2.7-批量下载壁纸

##壁纸来自桌酷网站,所有权归属其网站

##本代码仅做为交流学习使用,请勿用于商业用途,否则后果自负

##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."

【python批量下载壁纸的实现代码】相关文章:

perl中的$a和$b介绍

perl Socket编程实例代码

Perl操作系统环境变量的脚本代码

perl比较两个文件字符串的实例代码

perl对m x n类似表进行按列排序的代码

perl的格式化(Format)报表输出实现代码

perl常量、多维数组及变量的初始化的实例代码

perl生成特定碱基比例的随机序列的代码

用Perl操作Excel文档的实例代码

perl实现blog备份的脚本代码

精品推荐
分类导航