`

getPic.pl 文件操作

    博客分类：
  • Perl
PerlJavaHTML 
阅读更多 
#!/usr/bin/perl
use warnings;
use strict;
#aa.txt中找出图片链接，写入result.html中，可以用迅雷等批量下载
open SRC, "<aa.txt";
open DEST,">result.html";
my $count=0;
print DEST "<html><body>";
while(<SRC>){
    if(/(.*)(src=")(.*\.jpg)(.*)/){
        print $3."\n";
        print DEST "<a href='$3'>$3</a><br>\n";
        $count++;
    }
}
print DEST "</body></html>";
print "$count\n";
0
顶
0
踩
分享到：
| Perl 之LWP 与 WEB 的基本使用(zz)
评论
发表评论

您还没有登录,请您登录后再发表评论

相关推荐

    GetPic.ec 取网页图片 同步验证码

    无忧验证码易模块中分离出来的一个功能。 目的是为了同步识别网页中验证码。

    getPic1.py

    Python3获取京东商品列表信息，并根据列表信息地址提取信息详情页的相关图片（京东商品详情信息图片采用JS动态加载，需控制网页滚动至一定位置才能加载，初始的静态页面没有商品图片），因此本文采用两种方法加载...

    基于pytorch+pyqt5实现树莓派4b的智能垃圾分类系统源码+项目说明.zip

    文件组成 data_set文件夹 train文件夹 模型训练集 val文件夹 模型验证集 ...getpic.py 拍摄训练图片用的程序 main.py 垃圾分拣流程，注意:单独运行这个文件没有UI motocontrol.py 控制舵机的函数

    2020易语言模块大全持续更新1.zip

    GetPic.ec GetStringSize.ec Hex-Dec.ec hide.ec hotkey30.ec HTTP.ec http_ec.ec HTTP访问模块 .ec Http访问模块.ec HTTP访问模块1.0.ec HTTP访问模块1.1.ec IC卡读写模块 1.0.ec Idoit内存皮肤模块.ec internet2....

    DVD转换到AVI的源代码

    MMX-optimized motion compensation (recon.c getpic.c) 8. MMX-optimized color space conversion (store.c) 9. audio normalization (norm.c) - The author of TMPGEnc, Hiroyuki Hori, defines the spec of ...

    YUVviewerForHEVC_new_version H.265 开发工具

    YUVviewerForHEVC 开发辅助工具 LCU查看器! ...如何用YUVviewerForHEVC查看器依次打开YUV文件和LCU.dat文件即可! 例子的分辨率是 256 x 192 开发者: http://blog.csdn.net/feixiang_john 飞翔

    Jtag-Mp3专辑封面读取和添加工具.zip

    利用JAudioTagger和Commons-CLI写的一个可获取和添加MP3专辑封面的jar命令行工具。... -mp3 &lt;arg&gt; 要操作的媒体文件 -pic &lt;arg&gt; 设置专辑图片 -title &lt;arg&gt; 设置标题 本工具仅支持:mp3, flac; jtag 0.0.1 by @foyou

    YUVviewerForHEVC 开发辅助工具 LCU查看器!

    YUVviewerForHEVC 开发辅助工具 LCU查看器! 下面是查看的例子: 明显可以看到LCU(64x64)是如何...如何用YUVviewerForHEVC查看器依次打开YUV文件和LCU.dat文件即可! 开发者: http://blog.csdn.net/feixiang_john 飞翔

    c#屏幕捕捉程序

    this.Hide(); //隐藏主窗体 System.Threading.Thread.Sleep(100); //主线程休眠1秒，以使用主窗体完全从桌面消失 ... this.pictureBox1.Image = body.getpic; body.Close(); this.Show(); //还原主窗体

    YUVviewerForHEVC 开发辅助工具

    YUVviewerForHEVC 开发辅助工具 LCU查看器! 使用方法和一般的YUVviewer一样, 不同就是多了一个...如何用YUVviewerForHEVC查看器依次打开YUV文件和LCU.dat文件即可! 开发者: http://blog.csdn.net/feixiang_john 飞翔

    易语言操作网页教程操作手机版网页

    易语言操作网页教程操作手机版网页源码,操作网页教程操作手机版网页,setWeb,setUA,setCookie,go,input,click,select,getPic,getEle,sub_wait,sub_delay,sub_serchTag,ie_置cookie,ie_置代理,ie_静音,ie_置UA,clip_...

    易语言操作网页教程取图片

    易语言操作网页教程取图片源码,操作网页教程取图片,setWeb,go,input,click,select,getPic,getEle,sub_wait,sub_delay,sub_serchTag,clip_OpenClipboard,clip_CloseClipboard,clip_GetClipboardData,clip_...

    vcg(验证码控件)

    b) 在Microsoft Visual Studio 2005中打开相应的网站，并打开相应的aspx页面文件（在本文中以Default.aspx为例），进入Design编辑模式； c) 从工具箱将之前添加的vcg控件拖到Default.aspx页面上。此时页面...

    易语言test源码,易语言调用DLL中的资源

    易语言调用DLL中的资源源码,调用DLL中的资源,getpic,API_lstrcpyn

    C#创建线程带参数的方法

    Thread thread = new Thread(new ThreadStart(getpic)); thread.Start(); private void showmessage() { Console.WriteLine(hello world); } 2、带一个参数的线程 使用ParameterizedThreadStart，调用 System....

    php使用Imagick生成图片的方法

    public function getPic(){ header('Content-Type: text/html; charset=utf-8'); $text = '中粮屯河（sh600737）';//中粮屯河（sh600737） $watermark = '305988103123zczcxzas'; $len = strlen($text); $width...

Magicbox
Global site tag (gtag.js) - Google Analytics