准备躺平的博客_Perl

perl 爬ku6视频

起因是自己想在公司做ku6视频缓存增加点工作经验（领导非常支持，找了7台720XD,有个好领导还是很幸福的），后来因为白天回源紧张，就停止计划了；某天突然想到那些视频公司都是主动推送热点文件到服务器，要是我自己凌晨回源同步热点，减少白天热点文件回源，那我视频缓存项目还可以继续推进；个人是perl新手，下面代码有些是朋友帮忙写的（有好朋友也幸福...要不然自己要研究到啥时

perl 抓网页

原创 2013-09-01 22:00:47 765 阅读

递归算法

递归算法解决问题的特点：　　(1) 递归就是在过程或函数里调用自身。　　(2) 在使用递增归策略时，必须有一个明确的递归结束条件，称为递归出口。 (3) 在递归调用的过程当中系统为每一层的返回点、局部量等开辟了栈来存储。递归算法所体现的“重复”一般有三个要求：　　一是每次调用在规模上都有所缩小(通常是减半)；　　二是相邻两次重复之间有紧密的联系，前一次要为后一次做准备(通

perl 递归

原创 2013-07-28 22:19:06 653 阅读

学习perl点滴(二)

shift用法：#!/usr/bin/perl sub check_required_items { my $who = shift; print "$who\n"; my %who_items = map {$_, 1} @_; my @required = qw(preserver sunserver water_bottle jacket);

perl shift

原创 2013-06-08 01:37:07 502 阅读

Perl批量执行Linux安装程序和脚本

转载http://www.oschina.net/code/snippet_222150_7901 #!/usr/bin/perl #use Cwd; sub ExecuteAll(){ local($dir) = @_; opendir(DIR,"$dir"|| die "can't open $dir"); loca

perl

转载精选 2013-01-29 00:03:30 647 阅读

perl 删除某个文件

[root@bogon gongzuo]# cat -n search.pl 1 #!usr/bin/perl 2 use strict;

职场

休闲

perl

原创 2012-03-25 18:45:41 1223 阅读

Perl实现远程上传脚本并执行

前面懒人之脚本配置snmp服务文章提到，提到用perl 写非交互远程登录，上传安装脚本，并执行。呵呵用了一天才完成，最后朋友给加了，循环。下面脚本经过测试没问题，这脚本还的改进，我需要从服务器上下载日志到本地。 1 #!/usr/bin/perl 2 #Author:luyafei 3 #Email

职场

休闲

perl net::scp::expe

原创 2011-11-27 00:03:24 1179 阅读

学习perl点滴(一)

这里记录俺在学perl过程中遇到的痛苦，快乐。 1》今天看到别人博客用sed,awk 输出文件奇，偶数行，突然自己也想用perl尝试写，开始直接$.%0 一直报错，理解错了%用法，今天写出这个也是自己学一句话的小小突破吧。 perl -wnl -e '$. % 2==0 and print;' grep_test 显示文件偶数行

职场

学习笔记

休闲

perl

原创 2011-09-01 00:47:33 668 阅读

用perl解决问题思路

以下都是俺自己在学习中理解重新认识到的，记录自己的点滴； 1》以前不会用perl，查某个字符出现次数，现在会了；思路：正则 if ++ 2》以前不会在某两个字符间添加字符，现在会了；思路：if 正则替换捕获 $1 $2 /()()/$1()$2/g

职场

心得

休闲

perl

原创 2011-08-26 20:11:27 690 阅读

我遇到的正则面试题

1。匹配12：23：14：28 或者23：24：45：23 我的答案 \d{2}:\d{2}:\d{2}\d{2}或者［0－9］：［0－9］：［0－9］：［0－9］ 2。匹配以153为开头的手机号答案 ^153\d{8} 3。匹配如下2个网址http://bin.china.news.com/123/648.htlm

职场

正则

休闲

原创 2011-02-28 23:07:25 803 阅读

qq 面试题用perl 写

这是群里发的，俺正学习perl ，就想用perl ，尝试的写，第一次写的如下，群里人提示用rename，俺就接着改第二次写的如下：被批的一文不值，垃圾的不行，最后提示子目录问题让用File::Find模块，俺看小骆驼　找到了，但人家没讲。

面试

职场

qq

休闲

perl

原创 2011-02-19 13:24:03 785 阅读

perl的特殊变量

让你的perl代码看起来更像perl代码，而不是像C或者BASIC代码，最好的办法就是去了解perl的内置变量。perl可以通过这些内置变量可以控制程序运行时的诸多方面。本文中，我们一起领略一下众多内置变量在文件的输入输出控制上的出色表现。

职场

休闲

perl

perl 特殊变量

转载精选 2010-08-04 20:47:25 498 阅读

职场

Perl提供的另一种表示引号的形式

Perl提供了另一种表示引号的形式：q表示单引号， qq表示双引号， qx表示反引号，qw表示引用的字列表。. @hello = qw(hello world friends!); print "@hello" # 如果不加双引号，打印出来各个元素之间是没有空格的。加了双引号之后，才会有空格。 # q/.../ 果然是单引号，不会解释特殊字符，也不会对\n进行解释 $q

职场

休闲

Perl

形式

引号

转载精选 2010-05-06 09:03:38 493 阅读

Perl学习指南

学习方法每个人都有不同的学习方法, 下面列举几个供参考, 如果 Perl 是你学的第一个编程语言，推荐先看一些编程基础，流程控制,逻辑和设计的知识. _大家有没有好的中文书籍介绍？如果你学过其他语言，那就可以从学习 Perl 的语法开始[:http://xrl.us/fz9e ) 个人认为学习Perl是一件终身的事情，入门的话，先把Perl基本语法、操作符、函数

职场

指南

学习

休闲

Perl

原创 2010-03-29 22:19:56 757 阅读

关于学习Perl语言（二）想学Perl必看

今天转载的主要是介绍Perl各种开发工具，我在51CTO看到没人具体的写Perl语言技术系列文章，偶来完成，呵呵！下一篇写开发工具的安装，主要是大家都是初学者，学Perl语言起码也有个环境，别在脑海里冥想（工具有好多功能，不然记事本也可以写的，何必用开发工具呀）。偶还是幸运的，跟我一起参加培训的一个同学，他学软件开发的，在他电脑上安装着Unix ,Linux,这样就可以在他电脑上学习了，不过因为大

休闲

Perl

入门Perl

必看

转载精选 2010-01-06 22:58:13 1688 阅读

关于学习Perl语言（一）想学Perl必看

关于学习Perl (本人也是刚开始学Perl,在网上也找了资料，感觉关于Perl资料很少。在http://www.perlchina.org/中国Perl协会看到建议初学者应该看Perl入门语言（第三版中文版），嘿嘿！在网上找了好久没找到，如果有人找到了，分享一下，看到一些人建议看Perl入门语言（第四版中文版），第四版在网上很好找的，在51CTO上传附件有限制，很麻烦的，我在这就不上传附件了，

休闲

Perl

入门Perl

必看

转载精选 2010-01-06 00:20:23 2556 阅读

官方博客	全部文章	热门标签	班级博客
了解我们	网站地图	意见反馈

鸿蒙开发者社区	51CTO学堂
51CTO	软考资讯

51CTO博客

立成为网络安全工程师

perl 爬ku6视频

递归算法

学习perl点滴(二)

Perl批量执行Linux安装程序和脚本

perl 删除某个文件

Perl实现远程上传脚本并执行

学习perl点滴(一)

用perl解决问题思路

我遇到的正则面试题

qq 面试题用perl 写

perl的特殊变量

[强烈推荐]Perl常问问题集

Perl提供的另一种表示引号的形式

Perl学习指南

关于学习Perl语言（二）想学Perl必看

关于学习Perl语言（一）想学Perl必看