#!/usr/bin/perl
use warnings;
use strict;
use LWP::Simple;
my $downloadDir="e:\\365doc\\picture";
my $tomcatDir = 'd:\Tomcat6.0\webapps\picture';
my $linkTemp = 'd:\temp\bb.html';
my $picTemp = 'd:\temp\cc.html';
my $baseUrl01 = "http://localhost:8080/";
my $baseUrl02 = "http://localhost:8080/mingbai365/";
my ($startUrl) = shift;
my $method = shift;
if(!defined($startUrl) || $startUrl =~ /^no$/){
$startUrl = 'http://localhost:8080/mingbai365/index.mb';
}
if(defined($method) && $method eq "index"){
&getPagePic($startUrl);
&getLinkPic($startUrl);
}else{
&getPagePic($startUrl);
}
# 取页面的链接页面的图片
sub getLinkPic{
my ($indexUrl) = @_;
&writeTemp($linkTemp,&get($indexUrl));
open LINK_SRC, "<$linkTemp";
while(<LINK_SRC>){
if(/(href=")(.*\?.*?)(")/ && //){
my $pageUrl = $2;
print "href is : $2\n";
if($2=~/http/){
&getPagePic($pageUrl);
}else{
if($2=~/mingbai365/){
&getPagePic($baseUrl01.$pageUrl);
}else{
&getPagePic($baseUrl02.$pageUrl);
}
}
}
}
close LINK_SRC;
}
# 取页面内图片
sub getPagePic{
my ($indexUrl) = @_;
print "arg:$indexUrl======================================\n";
my $count =1;
while($count>0){
$count--;
#取得网页的内容写入文件
my $content = get($indexUrl);
&writeTemp($picTemp,$content);
#打开文件,处理内容(不会在内存中处理行,真白痴)
open SRC, "<$picTemp";
while(<SRC>){
#找到图片模式
if(m!(.*)(picture/)(\d+)(/)(.*jpg)(.*)!){
my $picurl="http://www.mingbai365.com/".$2.$3.$4.$5;
my $dest =$downloadDir.'\\'.$3."\\";
#文件夹不存在,新建
if(not -e $dest){
mkdir($dest);
}
#文件不存在,下载
if(not -e $dest.$5){
getstore($picurl, $dest.$5);
}
print "$2$3$4$5\n";
}
}
close SRC;
}
#windows 命令 复制文件
system("xcopy $downloadDir $tomcatDir /d /s /c /y /i");
}
# 写入文件内容
sub writeTemp{
my ($filePath,$content) = @_;
open DEST_FILE, ">$filePath";
print DEST_FILE $content;
close DEST_FILE;
}
print "结束了=================================";
分享到:
相关推荐
下载图片,图片下载器 适合人群:python初学者,想要上手试一试 能学到什么:1、python基本知识 2、pyqt5相关使用 3、beautifulsoup相关使用 阅读建议:此程序功能相对简单,适合初学者用于练手,并不支持商业化...
适用场景:一键将页面上的全部图片打包下载,纯前端实现。 使用插件:jszip.js、filesaver.js、jquery 下载后直接用chrome、firefox、IE11+打开即可查看效果,仅供学习参考。
android 图片选择图片上传到服务端并保存到mysql数据库,同时能支持从服务端下载图片资源
php直接下载图片php直接下载图片php直接下载图片php直接下载图片,而不是压缩包下砸,测试可以,里面有主意事项自己看。
DownLoadImageToGallery: Android 下载图片保存到相册
pdf图片下载图片下载图片下载图片下载图片下载
C# winfrom中webservice接口连接服务器上传图片和下载图片。 上传图片和下载图片,使用的时候先要在你要上传的服务端用IIS发布webservice接口 传输图片
便捷下载 for Android 支持多平台一键批量下载图片、音频、视频的懒人工具
Android批量下载图片并进行缓存,本例包含内存和文件二重缓存,极大的提高流畅度。
通过url网址下载图片,可以选择有代理下载,也可以选择无代理下载
在DOS下,利用javac编译.Java成为.class文件,然后运行.class文件,实现下载图片。
C# winfrom中webservice接口连接服务器上传图片和下载图片 C# winfrom中webservice接口连接服务器上传图片和下载图片
本项目是一个批量下载图片的小例子,项目编码UTF-8编译版本4.4.2主要特点有: 1、下载大图decode时,可根据View大小自动缩放图片,不在出现OOM和SkImageDecoder::Factory returned null错误 2、图片下载失败时,可...
通过C#网络编程的webBrowser获取网页中的url并简单的尝试...其中主要的通过应用程序结合网页知识、正则表达式实现浏览、获取url、下载图片三个功能.而且很清晰的解析了每一步都是以前一步为基础实现的.结合知识博客.
可以直接串口连接下载图片 文字布局等功能 特别的好用
Scrapy ImagesPipeline下载图片 Scrapy ImagesPipeline下载图片
使用xutils下载图片的demo,xutils的图片下载使用方式
ios异步 异步下载图片 线程小demo
HttpRequest下载图片的Demo