netstat   -ab  [chrome.exe]   TCP    192.168.1.107:53727    204.244.102.19:80      ESTABLISHED  [chrome.exe]   TCP    192.168.1.107:53746    121.14.11.200:80       CLOSE_WAIT  [chrome.exe]   TCP    19

perl的特殊变量还有很多的，例如常用的还有@_、@ARGV、$ARGV、%INC、%ENV等。 $-      当前页可打印的行数,属于Perl格式系统的一部分 $!      根据上下文内容返回错误号或者错误串 $”      列表分隔符 $#     打印数字时默认的数字输出格式 $$      Perl解释器的进程ID $%     当前输出通道的当前页号 $&      与上个格式匹配的

#perl -MCPAN -e 'install Time::HiRes' perl在5.0之后引入了模块化的概念，实现面向对象的编程。CPAN（Comprehensive　Perl　Archive　 Network）是internet上Perl模块最大的集散地，包含了现今公布的几乎所有的perl模块，通过上面的例子，可以获知利用这个格式，可以 到CPAN上安装需要的模块。 安装前需要先联上线，并

Perl 语言经常由 IBM AIX 操作系统管理员和开发人员使用，几乎每个成功的网站和大多数 AIX 系统上都使用了该语言。尽管 Perl 脚本的功能非常强大，但它产生的 Web 接口却缺少图形化前端，用户必须键入信息，而不能使用鼠标，对于客户来说，这一点非常不尽人意。随着 Perl 中 Tk 模块的引入，此问题已得到解决。管理员或开发人员可以利用 Tk 模块快速为其 Perl 脚本带来新的生机

本帖最后由 hu145165 于 2010-05-31 23:03 编辑 convert to UTF8? I'm trying to fix an issue for someone who's using a meta-search engine on a French web site. The data being pulled in, I would have assumed, shou

环境: linux                                           en_US.UTF-8  perl, v5.8.8 mysql-5.1.46                          表字符集:gbk_chinese_cli   我的perl脚本是分析一个log日志.然后插入mysql中入库.但是结果很让人不爽.乱码. 折腾了很久.弄好了.解决方式如

写在前面：分享连接：http://tech.it168.com/zt/perl/index.html   转自：http://www.chinaunix.net/jh/25/59799.html   Perl语言简介  [转帖自Server & SHELL论坛：http://china.65535.net/phpBB204/phpBB2/index.php] [作者：briancai@urpos.

都说Perl中的ParseExcel很厉害，而且可以跨平台。最重要的是，与OLE的库相比，使用这个库的时候，可以不用关闭EXCEL正常使用。 一般用这个库读取小文件很有用，一般小型文件，用它都有效。但是这个库真的可以完全支持微软的Excel吗？ 测试结论是可以，但最多只能完美读出Excel4.0的xlw格式，连Excel5.0格式都不能完全读出！     测试用代码： ###ParseExcel.

    my $a=1; for(my $j=0;$j<=$a;$j+=0.05){   print "$j/n"; }   for(my $j=1;$j<=10;$j++){   print "$j/n"; }   0 0.05 0.1 0.15 0.2 0.25 0.3 0.35 0.4 0.45 0.5 0.55 0.6 0.65 0.7 0.75 0.8 0.85 0.9 0.95 1 2

#!/usr/bin/perl open (IPADR,"/root/lee/test/ip") || die "read file error"; my $line; while ( defined ($line=<IPADR>) ){     @line=split(/\s+/,$line);    #@line=$line;         #print @line;            

#!/usr/perl/bin use strict; use Data::Dumper; my %h=( "Alex"=>24, "Sam"=>25, "Bob"=>30, "Andy"=>11, "Wills"=>35, "Mary"=>16, "Helen"=>24 ); print(Dumper(/%h)); # output origi

工作中需要处理INI 配置文件，看了下同事写的脚本，处理的比较简单，只解析了需要的那部分，没有对其他部分做出处理，自己重新写了一个，可以把整个文件一次处理完毕，很简单，代码如下：   use warnings; use Data::Dumper; my $f = 'd:/project/SDI/params.config'; my (%dict,$this); open FILE,"$f"; wh

1.使用重定位的方法,比如: system "path >> d://path.txt"; 然后再对临时文件 path.txt 处理   2.使用 `  (这个是tab上面的`) 就是这个东东,弄了好久才搞明白...一定是 TAB 上面的 ` 不是 ~,也不是单引号' my $path = `path`; print $path;   3.使用qx// //是分隔符,也可以用其他符号代替,比如!,

<!-- /* Font Definitions */ @font-face {font-family:宋体; panose-1:2 1 6 0 3 1 1 1 1 1; mso-font-alt:SimSun; mso-font-charset:134; mso-generic-font-family:auto; mso-font-pitch:variable; mso-font-signatu

<!-- /* Font Definitions */ @font-face {font-family:宋体; panose-1:2 1 6 0 3 1 1 1 1 1; mso-font-alt:SimSun; mso-font-charset:134; mso-generic-font-family:auto; mso-font-pitch:variable; mso-font-signatu

<!-- /* Font Definitions */ @font-face {font-family:宋体; panose-1:2 1 6 0 3 1 1 1 1 1; mso-font-alt:SimSun; mso-font-charset:134; mso-generic-font-family:auto; mso-font-pitch:variable; mso-font-signatu