搜索博文结果_ChinaUnix博客

博客首页博客专家往日推荐博客文集

热搜： Windows 网络安全 C++ PHP LINUX AIX 负载均衡 CCNA

博客首页〉搜索结果

按类别查询搜索结果

操作系统程序设计数据库热点技术综合架构与运维移动开发与应用 Web前端

关于关键词的检测结果，共 105 条

【PERL】 perl正则-环视/零宽度向前断言用法

mouse.rice | 2013-05-26 20:12:49 | 阅读(760) | 评论(0)

$str = "abc;efg;ddd; fdd";需求：将$str分割成 "abc", "efg", "ddd; fdd" 三个元素（碰到分号分割，而碰到分号加空格不分割）点击(此处)折叠或打开while(<DATA>){my @list = split /;(?=w)/;print join ",",@list;}...【阅读全文】

【PERL】 CGI（使用Perl）GD绘图实例-----原创

mouse.rice | 2013-05-26 18:22:38 | 阅读(380) | 评论(0)

【阅读全文】

【PERL】不要引用数组

zhengsenlin888 | 2013-05-23 11:39:24 | 阅读(860) | 评论(0)

搬起数组引用的石头砸自己的脚下面的数组拥有5个元素：my @array1 = (1, 2, 3, 4, 5);print @array1; # "12345"下面的数组拥有一个元素（它刚好是对一个匿名的，拥有5个元素的数组的引用）：my @array2 = [1, 2, 3, 4, 5];print @array2; # e.g. "ARRAY(0x182c180)"这个标量是对一个匿名的，拥有5个元...【阅读全文】

【PERL】基于Perl的SQL扫描注入工具

448395708 | 2013-05-07 12:46:57 | 阅读(1190) | 评论(0)

基于Perl的asp+access扫描注入工具，cookie扫描注入还未完成#!usr/bin/perl use strict;use LWP::UserAgent;use HTML::LinkExtor;use URI::URL;use URI::Escape;use 5.010001;#use HTTP::Cookies;$|=1;...【阅读全文】

【PERL】基于Perl的SQL扫描注入工具

hkkkyy | 2013-05-06 20:26:46 | 阅读(810) | 评论(1)

基于Perl的asp+access扫描注入工具【阅读全文】

【PERL】用Devel::NYTProf模块排查优化perl脚本性能

BuTa丶潇 | 2013-04-26 16:58:09 | 阅读(1460) | 评论(0)

缓存服务器上有一个perl写的日志分析脚本，记录所有不重复的url。之后对squid进行目录刷新时，从记录下来的文件中查找匹配的url即可。不过这些天服务器老是出现负载报警，用top观察，这个url_parser.pl脚本一旦执行时，就占用了高达90%的CPU和40%的MEM。wc看存储的url.list文件，有大概4,000,000行；url.`date`.list当前有...【阅读全文】

【PERL】在 Perl 中使用 Getopt::Long 模块来接收用户命令行参数

ronghy013 | 2013-04-24 16:20:41 | 阅读(750) | 评论(0)

我们在linux常常用到一个程序需要加入参数,现在了解一下 perl 中的有关控制参数的模块 Getopt::Long ,比直接使用 @ARGV 的数组强大多了.我想大家知道在 Linux 中有的参数有二种形式.长参数 –help短参数 -h也就是-和–的分别.–表示完整参数.-表示简化参数.在 Perl 的这个模...【阅读全文】

【PERL】使用Perl和VC通信

CUTianrui007 | 2013-04-21 13:42:38 | 阅读(2760) | 评论(0)

Perl VC Memory Process【阅读全文】

【PERL】用Perl解析PDF

CUTianrui007 | 2013-04-19 22:33:44 | 阅读(2890) | 评论(0)

Perl PDF【阅读全文】

【PERL】用Perl解析CANTrace文件

CUTianrui007 | 2013-04-18 15:23:06 | 阅读(1900) | 评论(0)

Perl　CANoe　CANTrace【阅读全文】

【PERL】 V louis vuitton ST9135608

bestayydm | 2013-03-26 17:53:04 | 阅读(590) | 评论(0)

Louis vuitton uk torres got when Chelsea simply Abramovich was adamant the particular Budget Counseling advice connected with trainers to decide on the shoes boy. Ones online ruskies notoriously will lose a concern as soon Handbags as he appears one (Become aware of less than Shevchenko louis vuitto...【阅读全文】

【PERL】关于$/的一些用法(自己的一些笔记)

BuTa丶潇 | 2013-03-25 10:32:42 | 阅读(1480) | 评论(0)

什么是记录？记录的缺省定义为：“行”。记录的定义由$/ 变量控制的，该变量存放所输入的记录的分隔符，因为换行符字符(根据定义！)是用来分隔行的，故其缺省值为串“\n”。例如，你可以用任何你想要替换的符号来代替“\n”。 $/ = ";"; $record = <fh>; # 读入下一个用分号分隔...【阅读全文】

【PERL】 linux socket实现机器间的通信(Perl)

andersonyan | 2013-03-22 22:16:24 | 阅读(2930) | 评论(0)

一、IO::Socket简介IO::Socket, 它是socket通信的面向对象的Perl接口。IO::Socket下又有两个子类IO::Socket::INET与IO::Socket::UNIX.现在用的是IO::Socket::INET。它的步骤是:先调用new方法，然后就可以进行基本I/O操作(使用print与getline等基本I/O方法)了，最后调用close方法结束会话，那么整个SOCKET会话就算完...【阅读全文】

【PERL】 perl中一些工作中使用的小技巧(自己的一些笔记)

BuTa丶潇 | 2013-03-22 16:18:02 | 阅读(1350) | 评论(0)

localtime# 秒分时天月年星期年天 # 0 1 2 ...【阅读全文】

【PERL】 Perl算法-递归的妙用

kk861123 | 2013-03-15 23:32:03 | 阅读(0) | 评论(0)

递归算法在实际生活中大量被使用，很多问题可以很巧妙的被解决掉。例1：楼梯有n个台阶，上楼可以一步上1阶，也可以一步上2阶，一共有多少种上楼的方法？斐波那契数列第一项为1 第二项为2 也就是f(n)=f(n-1)+f(n-2),用递归求。#!/usr/bin/perl -wuse strict;print...【阅读全文】

【PERL】 perl grep的用法

BuTa丶潇 | 2013-03-13 15:41:52 | 阅读(1270) | 评论(0)

在unix/Linux中有一个强大的命令用来搜索文件中的模式，相信大家都比较熟悉，那就是grep，同样在perl中，grep也被用来进行搜索某个模式。下面我们来看一下grep的一个例子：#! /usr/bin/perluse strict;use warnings;my @array = qw(greyhound bloodhound hello hand);my @hound = grep /hound/,@array;print ...【阅读全文】

【PERL】食品安全物联网今日全面启动重点关注12股

yeshib31081 | 2013-03-13 14:30:10 | 阅读(210) | 评论(0)

食品安全物联网今日全面启动重点关注12股。为推动国家物联网重大应用示范工程的建设，国家重点食品（产品）质量安全追溯物联网应用示范工程项目启动大会将于今天下午在贵州省贵阳(贵州贵阳)市召开。其中新大陆曾中标商务部2012年全国肉类http://www.100lemai.com/flagship/food/food_57/蔬菜流通追溯体系建设采购项目，中...【阅读全文】

【PERL】 perl 利用Time::Piece 模块进行对时间戳转换成我们常看的时间

zhengsenlin888 | 2013-03-13 11:18:59 | 阅读(1950) | 评论(0)

#!/usr/bin/perl#author: zhengsenlin#date: 2013-03-13#desc: time piece use 5.016;use strict;use warnings;use autodie;use Time::Piece;my $t = localtime(1360780381);my $real_time = $t->ymd . " " . $t->hms;say $real_time;【阅读全文】

【PERL】 perl 多进程调用

damofeixue64 | 2013-03-09 11:58:41 | 阅读(570) | 评论(0)

use POSIX;foreach my $id(sort keys %serv){my $pid=fork(); if($pid==0) { alarm(10); &nbs...【阅读全文】

【PERL】图论：查找购买某物品的顾客购买最多的其他物品

runningdark | 2013-03-08 16:00:40 | 阅读(1500) | 评论(0)

题目大意：有一个数组存储了多个顾客的购物清单。指定一个物品item1,求出购买了item1的顾客除了购买item1外，购买最多的物品。很实用的小题目。电商网站市场能看到。来源http://blog.chinaunix.net/uid-26750075-id-3370694.html 分析：简单的图论题目。首先把数组转成图的邻接表表示。实际就是求出到指定顶...【阅读全文】

首页
<<
1
2
3
4
5
6
>>
末页

网络110 报警服务