Perl 最初的设计者为拉里·沃尔（Larry Wall），他于1987年12月18日发表。Perl借取了C、sed、awk、shell scripting以及很多其他程序语言的特性。 　　Perl 一般被称为“实用报表提取语言”（PracticalExtraction andReportLanguage），虽然有时被称做“病态折中垃圾列表器”(Pathologically

参考网页： http://man.ddvip.com/web/perl/perl1.htm #========================================================== #变量前面加$; #8进制以0打头;16进制以0x打头; $value1 = 047; $value2 = 0xFF; #==========================

1.可以提取html，等无规律的文本中的ip和端口。 cat proxycn.txt  |perl -lne ' print $1 if ( /((\d{1,3}\.){3}\d{1,3}:\d{1,5})/ ) '  2.提取log中的被访问网址的次数   cat /usr/local/apache/logs/error_log|perl -nle 

  #===================================================== 数组变量以字符"@"打头 @array = (1, 2, 3); @var = (11, 27.1 , "a string"); #=====================================================   #====================

for windows       will 2010-1-9     目录 1.      概述 ..............................................  4 1.1    安装环境 ........................................  4 2.      安装..................................

#version: 2011-2-15 #!/usr/local/bin/perl -w use strict; #use cwd; use diagnostics; use LWP::UserAgent; use LWP::Simple; #use Win32; #use Compress::Zlib; #use List::Util qw(first max ma

 use Asterisk::AMI;         my $astman = Asterisk::AMI->new(PeerAddr        =>      '127.0.0.1',                                         PeerPort        =>      '5038',                                

Tsung必须先安装erlang   1. 安装 erlang sudo apt-get install erlang erlang-src gnuplot perl5   2. 验证erlang是否安装成功 erl   3. 期望结果： Erlang R13B03 (erts-5.7.4)[source][64-bit][smp:2:2][rq:2][async-threads:0][hipe

也是在另外一个博客中看到的，不过现在在网上竟然搜不到了，还好我记录了下来：   如果用Carbide编译任意工程，都出现类似如下的错误： ===Build Command = /c abld build WINSCW UDEB -v=== C:/WINDOWS/system32/cmd.exe /c abld build WINSCW UDEB -v   make -r  -f "/Symbian

perldoc perldoc : 查看perldoc命令的用法 perldoc perl : 查看帮助的摘要         perl  Perl概要 (也就是这页)                                    perldelta         自上一版来的变化     perl5005delta      版本5.005中的变化     perl5004delta 

$HashTable{$key} = [@Array] 这个是赋值 @Array = @{ $HashTable{$key} } 这个是取值

算是perl里面一种数据结构的应用吧。 @ arry = (     {          key1= > 'a' ,          key2= > 'b'     } ) ; % hash = ( key1= > 'c' , key2= > 'd' ) ; #往数组里增加散列 push @ arry , /% hash ; #注意这里一定要引用一下 #遍历生成的散列的数组并打印 foreac

9    Perl 中的正则表达式 正则表达式的三种形式 正则表达式中的常用模式 正则表达式的 8 大原则       　　正则表达式是 Perl 语言的一大特色，也是 Perl 程序中的一点难点，不过如果大家能够很好的掌握他，就可以轻易地用正则表达式来完成字符串处理的任务，当然在 CGI 程序设计中就更能得心应手了。下面我们列出一些正则表达式书写时的一些基本语法规则。 -------------

  说来话长了。。。。（咳嗽）   一句话说，你可以到http://qt.nokia.com/products/platform/symbian/找到相关文档，可以看看这个PDF whitepaper-qt-for-the-symbian-platform。 如果想快速开始，可以看QT QUICK START。 如果你不想看文档，那我就简单说几句吧。 =======================

无聊的时候想看小说，但是现在的小说排版很不好，就想“定长切分大字符串”重新排版一下，   找了一下资料，有两个好方法   用unpack已经可以了，具体的做法 @a = unpack("a25"X1000,$str); 上面的就是把$str分成1000个有25字符的字符串   正则表达式   @a = $str =~ /(.{25})/g;

       #加载库     use Win32::IEAutomation;     use Win32::IEAutomation::WinClicker;     use Win32::IEAutomation::Element;     my $ie = Win32::IEAutomation->new(vi