2013年09月_西红柿code

11月 10月 09月 08月 07月 04月 03月 01月

原创查看linux内存、cpu

1.查看cpu数多核cpu，包括物理多核和逻辑多核,一台机器可能有多个cpu，每个cpu可能有多核的，多个可能包括物理多核和逻辑多核。/proc/cpuinfo 文件里记录了这些信息，以下是一个核的信息：processor : 3vendor_id : GenuineIntelcpu family : 6model

2013-09-27 14:24:01 1688

原创 log4cplus配置文件使用

简介log4cplus是log4j的c++移植版，是c++中一个很好的打印日志的库。它与另外一个c++的log库log4cxx相比较，好处是不依赖于libapr和libaprutil，可以静态链接到程序中，便于部署。安装tar xvzf log4cplus-x.x.x.tar.gzcd log4cplus-x.x.x./configure --prefix=/where/to/

2013-09-18 15:46:27 11599 1

原创 perl学习(10) 字符串处理函数和排序

1.1.indexPerl 查找子串第一次在大字符串中出现的地方，返回第一个字符的位置。字符位置是从0开始编号的。如果子串在字符串的开头处找到，则index返回0。如果子串不存在，则返回-1. my $stuff = “Howordy world!”;my $where1 = index($stuff,“wor”); #$where1得到2my $where

2013-09-13 18:40:08 1212

原创 perl学习(9) 实例：取出操作时间最长的100个记录

需求描述：日志记录了一次操作的时间,即server端接收包到发送结果到client端的时间，取出操作时间最长的100个记录。[2013-09-13 15:23:50,445.500] [47028700024080] FATAL - socket = 9[2013-09-13 15:23:50,446.156] [47028700024080] FATAL - a client con

2013-09-13 18:32:45 1235

原创 perl学习(8) 控制：unless,until,next,redo,last

Perl中实现了所有C的操作符！Perl力求代码最少！ 1.1.unlessunless的含义是：除非条件为真，否则执行块中的代码，和if正好相反unless($fred=~ /^[A-Z_]\w*$/i){ print “The value of \$fred doesn’t looklike a Perl identifier name.\n”;}e

2013-09-13 18:25:59 6096

原创 perl学习(7) 正则表达式

我认为正则是任何脚本语言的重点，perl也是必须的，不过基本规则是一致。1. 正则表达式默认是对$_ 进行匹配，如下：$_ = “I dream a millinon”;if(m/eam/){ print “match success!” ;}可以通过=~进行绑定,符号成为绑定符，优先级非常高my $word = “let me become

2013-09-12 18:25:00 1407

原创 perl学习(6) 哈希

哈希在perl里是很重要的数据结构，现在想想定义三种变量：1,标量，就是c中的变量：$name2,列表，就是数组：@list3,哈希，形式上就是c中的map：%hash 1.1.定义如果Perl 只有3 个key/value 对，它的速度很快。当拥有3 百万key/value 对时，其速度仍非常快。大的hash 表，对性能不会有什么影响。特点：1.

2013-09-12 18:22:19 802

原创 perl学习(5) 输入和输出

1.1. 从标准输入设备输入行输入操作在到达文件的结尾时将返回undef，在while循环的条件中不能使用chomp： while (defined($line = )) { print “I saw $line”;} 在循环的内部，我们将看到每一行，一行接着一行，perl提供简写：while(){ print “I s

2013-09-12 18:19:45 1519

原创 perl学习(4) 子程序

子程序，类比c语言中的函数，在形式上个人认为最大的区别：没有形参1.1.定义子程序1.2.调用#! /usr/bin/perl sub marine{ $n += 1 ; print "$n\n" ;}&marine;&marine; 1.3.返回值1.3.1.

2013-09-12 18:18:50 1382

原创 perl学习(3) 列表

列表或称为数组，和c语言中的数据类似，只是perl自己特殊的一些写法。1.1.定义一个列表或者数组可以包含数字，字符串，undef值，或者任意不同类型的标量值的组合，但是这些元素的类型通常是一致的。数组下标：· 数组中的元素是由连续整数编了号的，其从0开始;· 下标可以是任何能返回数值的表达式。如果其值不为整数，则自动将其转换为小于它的最大整数值。

2013-09-12 18:01:52 1056

原创 perl学习(2) 基本数据类型等

1.1.数字所有数字格式内部一致，全部是double7.25e45 == 7.25 * 10455.256.002+3 #2+3，55.1-2.4 #5.1-2.4，2.73*12 #3*12，3614/2 #14/2，710.2/0.3 #10.2

2013-09-12 17:58:08 1178

原创 perl学习(1) 入门

Perl 被设计成90%擅长处理文本，10%处理其余的问题。因此Perl 有强大的文本处理能力，包括正则表达式。第一个程序 hello world#! /usr/bin/perl -wuse strict ;use warnings ;print "hello world!\n" ;warn "test warn\n";#告警信息die "test die"; #后面的程序

2013-09-12 17:53:07 967