博客园_iTech's Blog

DIY新电脑

2012-05-29T14:50:00Z

一硬件

商品清单

商品单价

Unifly 环宇飞扬 V6 摄像头

¥28.00

A-DATA 威刚万紫千红 DDR3 1333 4G 台式机内存

¥143.00 * 2 = ¥286.00

英特尔Intel 酷睿 i3 2120 (3.3GHz/32nm/LGA1155/L3=3M/65W) 盒装

¥769.00

WD 西部数据 WD Caviar Green WD20EARX SATA3接口台式机硬盘(2TB/IntelliPower 技术/64M)

¥759.00

Antec 安钛克 EA 380D green 台式机电源(额定功率380W/铜牌)

¥279.00

Microsoft 微软无线桌面套装800

¥119.00

antec 安钛克 ONE S 塔式机箱

¥199.00

GIGABYTE 技嘉 GA-H61M-DS2 (rev2.0) 主板（Intel H61 芯片组/LGA1155）

¥379.00

总价：¥2796

我是在易迅上买的，当前送货，应该都是正品吧。也可以选择新蛋或淘宝等。

二评价

网友评价：
* 装那个电源估计是等着以后装独显的，顺便说句，那个电源本身是不带电源线的~很悲催~需要自己配~另外绝对不要用绿盘作系统盘~

* 不要用2TB做系统盘，很慢的~~~~~~~

* 可以了。。。很不错啊。。。电源大点稳定啊。。。集显可以搞定现在90%的网络游戏。。。很强的。。。集显可以超的

* 硬盘太差，电源过好

* 不知道楼主这配置想做什么用，不配独显，用那么大功率电源做什么呢？如果是想做服务器，那主板配的也差点了，最起码是个H67起步啊。

个人感觉：

主板就是一般的，够用，估计以后cpu升级的时候的一起升级；

cpu不是最快的，但是用个几年应该也够了，性价比还可以；

内存8G的不错，一来是考虑到内存以后升级太麻烦，经常是旧的型号停产了买不到了，还有可以用内存虚拟硬盘，减少频繁的硬盘读写操作，必须说bt下载和系统的临时文件可以写到内存虚拟盘中；

硬盘确实是不怎么好，读写时声音还是比较大的，用来存储电影照片，以后再买个小点的固态硬盘当系统盘；

不怎么玩游戏，所以对显卡的要求不高，以后需要的话可以再加；
电源还可以，防止以后升级不够用，而且好的电源用起来感觉声音要小些，应该也稳定些吧，怎么说也是号称的80plus铜牌；

机箱也不错，就是和电源连接的线没有，的自己配；

机箱上的风扇声音还是比较大的，鉴于目前总功率比较低，发热小，所以先关掉了；
鼠标键盘个人感觉也还不错的，值这个价；

三系统安装

因为没有光驱，只有从u盘安装了，需要大于4G的u盘（win7系统就3G多），下载PE工具箱的U盘版，安装到u盘，然后将系统的iso也拷贝到指定的u盘目录下，插入新机器，在bios中从u盘启动，先格式新硬盘分区然后安装，安装后貌似有的驱动程序没有，例如不能上网，需要从其他的地方下载驱动到u盘然后安装，等能连上网一切就都好办了。

PE工具箱U盘版可以使用：电脑店U盘启动盘制作工具或大白菜超级u盘启动制作工具。

可惜我没有大的u盘，还是把新的硬盘挂载到旧的电脑上，格式分区后，拷贝了系统的iso后，在挂载到新机器上，从u盘启动安装的。

四系统的优化

声音太大的优化：去除一些不必要的服务。硬盘声音大win7系统优化

硬盘读写的优化：将内存虚拟为硬盘，使得系统的临时文件，浏览器的临时文件，bt下载等在内存中。内存虚拟硬盘

总结：总的来说不错，整个机器完全自己装起来，而且一次点亮，感觉现在电脑上必须的配件越来越少了，装机简单了，u盘装系统也没有那么难。

完！

本文链接

硬盘声音大win7系统优化

2012-05-28T14:32:00Z

1) 在任何一个盘符例如D盘上右键->属性->工具->立即进行碎片整理->启用计划->按计划运行（不选）。

2) 在控制面板中禁用Windows7 Defender。

3）禁用文件索引功能，在盘符上右键->属性->去掉“除了文件属性外，还允许索引此驱动器上文件的内容(I)”前面的勾选。

4) 禁用Volume Shadow Copy, Volume Shadow Copy是管理并执行用于备份和其它目的的卷影复制的。其实是没什么用处，一般可以禁用。但是如果此服务被终止，备份将没有卷影复制，并且备份会失败。如果此服务被禁用，任何依赖它的服务将无法启动。Win+R打开services.msc ，找到Volume Shadow Copy，设置为禁用或者手动都行。

5) 关闭或者卸载Windows Search, 使用Windows Search 4.0可以对计算机执行快速搜索。Windows Search 4.0帮助您查找和预览计算机上的文档、电子邮件、音乐文件、照片和其他项目。默认情况下，Windows 7 附带的一些程序和功能处于打开状态，其中包括 Windows Search。如果不使用 Windows Search ，则可以将其关闭。Win+R打开services.msc ，找到windows search，设置为禁用或者手动都行。

6）安装Microsoft Security Essentials代替其他的杀毒软件。

本文链接

内存虚拟硬盘

2012-05-28T13:49:00Z

转自：http://www.x-berry.com/

RamDisk是利用相关的软件将内存划分出来虚拟成硬盘。目前最为流行的RamDisk工具包括：

1.VSuite Ramdisk —— 免费版或付费版，免费版木有64位，蛋疼（官网）。
2.RamDisk Plus ——付费软件（官网）。
3.Qsoft RAMDisk Enterprise —— 个人用户免费（官网）。
4.Dataram RAMDisk —— 免费版最高支持4G内存（官网）。

一 Dataram RAMDisk

为数不多的提供免费版本且可以在win7 64bit运行的RamDisk，缺点是免费版最大支持4G，且有时会有广告条。

http://memory.dataram.com/products-and-services/software/ramdisk

注意使用run as administrator来安装和运行dataram ramdisk。

安装后有的时候看不到新创建的虚拟盘，需要到硬件管理中格式化然后才可见。

二设置使用RamDisk

创建了RamDisk之后，还必须将系统和一些程序的临时文件/缓存文件夹路径改为RamDisk下。

1.系统缓存文件夹的迁移

要通过RamDisk获得更佳的系统性能，那就要改变系统原本的缓存路径，将系统的缓存文件都保存至RamDisk，这样平时系统对临时文件的读取，就直接从RamDisk下读取，这样读取速度更快，系统性能能够有不少提高。详细设置：

Step 1 -右键单击“计算机”-选择“高级系统设置”-“高级”-“环境变量”；

Step 2 -修改Tmp和Temp的路径到Ramdisk下，共有四处要修改，把下图的J改为你的RamDisk盘符即可。当心日后出现问题，需要恢复环境变量的朋友，最好记录一下原来的Tmp和Temp的路径，以便还原；

2.修改浏览器的Internet 临时文件夹路径

修改浏览器的Internet 临时文件夹路径，可以提高浏览器对临时文件的读取，修改后你会觉得浏览器的运行速度明显提高。但不同的浏览器，修改方法各不相同，下面就分别对IE、FireFox和Chrome的临时文件夹路径修改分别说明：

1）IE的Internet 临时文件夹路径更改（以IE 9为例）

打开IE 9，点击右上角的“工具”按钮，进入“Internet选项”-“常规”-浏览器历史记录“设置”-点击“移动文件夹”，然后将路径改为到RamDisk下即可。

2）设置它Firefox的临时文件夹目录

相对IE，火狐的临时文件夹目录更改相对会麻烦些。具体修改步骤如下：

Step 1 -运行Firefox，在地址栏输入about:config，提示警告继续即可，进入Firefox的配置页面；

Step 2 -右键点击Firefox配置界面新建字符串；

Step 3 -输入browser.cache.disk.parent_directory，点击确定，然后输入字符串的值J:\\TEMP，把J换成你的RamDisk盘符即可。重启FireFox即成功更改FireFox的临时文件保存路径。

3）Chrome缓存路径的更改

假设你的RamDisk的盘符为J（根据自己的RamDisk的实际盘符作改变），具体的设置方法如下：

Step 1 -右键点击 Chrome 快捷方式，切换到“快捷方式”选项卡，在“目标”一栏的内容后面添加下面的命令行启动参数：

–disk-cache-dir=”J:\cache” –disk-cache-size=104857600

添加完之后大概就是这个样子：

C:\Users\[username]\AppData\Local\Google\Chrome\Application\chrome.exe
–disk-cache-dir=”J:\cache” –disk-cache-size=104857600

（注意：其中–disk-cache-size=是用来指定缓存文件的最大尺寸，示例的缓存文件的最大尺寸设置为100M，个人根据自己的情况设定）

Step 2 -打开 Windows 的注册表编辑器（Win+R，然后运行 regedit），定位到下面的注册表键：

HKEY_CLASSES_ROOT\ChromeHTML\shell\open\command在这里你可以看到一个指向 Chrome
运行路径的名为（Default）的键值，双击它，在 Chrome.exe 和 — “%1″ 的中间添加同样的命令行参数，添加完成后大概是这个样子：

“C:\Users\[username]\AppData\Local\Google\Chrome\Application\chrome.exe” –disk-cache-dir=”J:\cache” –disk-cache-size=104857600 — “%1″

保存退出之后，你 Chrome 的缓存目录就彻底指向 J:\cache 了，而且缓存文件最大不会超过100MB。

P.S.本文中介绍的方法仅适用于 Windows 7操作系统，Windows XP 和 Vista 用户可以根据实际情况变通，Mac 和 Linux 用户不适用。

3.更改p2p软件下载存放文件夹至RamDisk下

如果你的RamDisk的容量足够大，不妨考虑将下载文件夹设置到RamDisk下，下载完成后将转移到其他盘，这样会大大减少下载对传统硬盘的伤害。

完！

本文链接

Linux的inode的理解

2012-05-15T13:31:00Z

转自：
http://www.ruanyifeng.com/blog/2011/12/inode.html
http://blog.s135.com/post/295/
http://hi.baidu.com/leejun_2005/blog/item/d9aa13a53b3af6e99152ee7e.html

一、inode是什么？

理解inode，要从文件储存说起。

文件储存在硬盘上，硬盘的最小存储单位叫做"扇区"（Sector）。每个扇区储存512字节（相当于0.5KB）。

操作系统读取硬盘的时候，不会一个个扇区地读取，这样效率太低，而是一次性连续读取多个扇区，即一次性读取一个"块"（block）。这种由多个扇区组成的"块"，是文件存取的最小单位。"块"的大小，最常见的是4KB，即连续八个 sector组成一个 block。

文件数据都储存在"块"中，那么很显然，我们还必须找到一个地方储存文件的元信息，比如文件的创建者、文件的创建日期、文件的大小等等。这种储存文件元信息的区域就叫做inode，中文译名为"索引节点"。

二、inode的内容

inode包含文件的元信息，具体来说有以下内容：

* 文件的字节数

* 文件拥有者的User ID

* 文件的Group ID

* 文件的读、写、执行权限

* 文件的时间戳，共有三个：ctime指inode上一次变动的时间，mtime指文件内容上一次变动的时间，atime指文件上一次打开的时间。

* 链接数，即有多少文件名指向这个inode

* 文件数据block的位置

可以用stat命令，查看某个文件的inode信息：

stat example.txt

总之，除了文件名以外的所有文件信息，都存在inode之中。至于为什么没有文件名，下文会有详细解释。

三、inode的大小

inode也会消耗硬盘空间，所以硬盘格式化的时候，操作系统自动将硬盘分成两个区域。一个是数据区，存放文件数据；另一个是inode区（inode table），存放inode所包含的信息。

每个inode节点的大小，一般是128字节或256字节。inode节点的总数，在格式化时就给定，一般是每1KB或每2KB就设置一个inode。假定在一块1GB的硬盘中，每个inode节点的大小为128字节，每1KB就设置一个inode，那么inode table的大小就会达到128MB，占整块硬盘的12.8%。

查看每个硬盘分区的inode总数和已经使用的数量，可以使用df命令。

df -i

查看每个inode节点的大小，可以用如下命令：

sudo dumpe2fs -h /dev/hda | grep "Inode size"

由于每个文件都必须有一个inode，因此有可能发生inode已经用光，但是硬盘还未存满的情况。这时，就无法在硬盘上创建新文件。

四、inode号码

每个inode都有一个号码，操作系统用inode号码来识别不同的文件。

这里值得重复一遍，Unix/Linux系统内部不使用文件名，而使用inode号码来识别文件。对于系统来说，文件名只是inode号码便于识别的别称或者绰号。表面上，用户通过文件名，打开文件。实际上，系统内部这个过程分成三步：首先，系统找到这个文件名对应的inode号码；其次，通过inode号码，获取inode信息；最后，根据inode信息，找到文件数据所在的block，读出数据。

使用ls -i命令，可以看到文件名对应的inode号码：

ls -i example.txt

五、目录文件

Unix/Linux系统中，目录（directory）也是一种文件。打开目录，实际上就是打开目录文件。

目录文件的结构非常简单，就是一系列目录项（dirent）的列表。每个目录项，由两部分组成：所包含文件的文件名，以及该文件名对应的inode号码。

ls命令只列出目录文件中的所有文件名：

ls /etc

ls -i命令列出整个目录文件，即文件名和inode号码：

ls -i /etc

如果要查看文件的详细信息，就必须根据inode号码，访问inode节点，读取信息。ls -l命令列出文件的详细信息。

ls -l /etc

六、硬链接

一般情况下，文件名和inode号码是"一一对应"关系，每个inode号码对应一个文件名。但是，Unix/Linux系统允许，多个文件名指向同一个inode号码。这意味着，可以用不同的文件名访问同样的内容；对文件内容进行修改，会影响到所有文件名；但是，删除一个文件名，不影响另一个文件名的访问。这种情况就被称为"硬链接"（hard link）。

ln命令可以创建硬链接：

ln 源文件目标文件

运行上面这条命令以后，源文件与目标文件的inode号码相同，都指向同一个inode。inode信息中有一项叫做"链接数"，记录指向该inode的文件名总数，这时就会增加1。反过来，删除一个文件名，就会使得inode节点中的"链接数"减1。当这个值减到0，表明没有文件名指向这个inode，系统就会回收这个inode号码，以及其所对应block区域。

这里顺便说一下目录文件的"链接数"。创建目录时，默认会生成两个目录项："."和".."。前者的inode号码就是当前目录的inode号码，等同于当前目录的"硬链接"；后者的inode号码就是当前目录的父目录的inode号码，等同于父目录的"硬链接"。所以，任何一个目录的"硬链接"总数，总是等于2加上它的子目录总数（含隐藏目录）,这里的2是父目录对其的“硬链接”和当前目录下的".硬链接“。

七、软链接

除了硬链接以外，还有一种特殊情况。文件A和文件B的inode号码虽然不一样，但是文件A的内容是文件B的路径。读取文件A时，系统会自动将访问者导向文件B。因此，无论打开哪一个文件，最终读取的都是文件B。这时，文件A就称为文件B的"软链接"（soft link）或者"符号链接（symbolic link）。

这意味着，文件A依赖于文件B而存在，如果删除了文件B，打开文件A就会报错："No such file or directory"。这是软链接与硬链接最大的不同：文件A指向文件B的文件名，而不是文件B的inode号码，文件B的inode"链接数"不会因此发生变化。

ln -s命令可以创建软链接。

八、inode的特殊作用

由于inode号码与文件名分离，这种机制导致了一些Unix/Linux系统特有的现象。

1. 有时，文件名包含特殊字符，无法正常删除。这时，直接删除inode节点，就能起到删除文件的作用。

2. 移动文件或重命名文件，只是改变文件名，不影响inode号码。

3. 打开一个文件以后，系统就以inode号码来识别这个文件，不再考虑文件名。因此，通常来说，系统无法从inode号码得知文件名。

第3点使得软件更新变得简单，可以在不关闭软件的情况下进行更新，不需要重启。因为系统通过inode号码，识别运行中的文件，不通过文件名。更新的时候，新版文件以同样的文件名，生成一个新的inode，不会影响到运行中的文件。等到下一次运行这个软件的时候，文件名就自动指向新版文件，旧版文件的inode则被回收。

九实际问题

在一台配置较低的Linux服务器（内存、硬盘比较小）的/data分区内创建文件时，系统提示磁盘空间不足，用df -h命令查看了一下磁盘使用情况，发现/data分区只使用了66%，还有12G的剩余空间，按理说不会出现这种问题。后来用df -i查看了一下/data分区的索引节点(inode)，发现已经用满(IUsed=100%)，导致系统无法创建新目录和文件。

查找原因：

/data/cache目录中存在数量非常多的小字节缓存文件，占用的Block不多，但是占用了大量的inode。

解决方案：
1、删除/data/cache目录中的部分文件，释放出/data分区的一部分inode。
2、用软连接将空闲分区/opt中的newcache目录连接到/data/cache，使用/opt分区的inode来缓解/data分区inode不足的问题：
ln -s /opt/newcache /data/cache

完

本文链接

比较csh+perl+python

2012-04-28T05:03:00Z

http://hyperpolyglot.org/scripting

比较csh+perl+python

	csh	perl (1987)	python (1991)
基础
模块导入		use strict;	import os, re, sys
版本查看		$ perl -v	$ python -V
执行脚本	$ csh foo.csh	$ perl foo.pl	$ python foo.py
交互模式	$ csh	$ perl -de 0	$ python
执行语句		$ perl -e 'print("hi\n")'	$ python -c "print('hi')"
语句分隔	\n (newline) or ;	;	\n (newline) or ;
语句块	If()then endif foreach end while end	{}	Indent
注释	#	# comment	# comment
多行注释		=for comment line another line =cut	use triple quote string literal: '''comment line another line'''
变量和操作符
赋值	Set a=v	$v = 1;	v = 1
赋值		($x, $y, $z) = (1, 2, 3); # 3 is discarded: ($x, $y) = (1, 2, 3); # $z set to undef: ($x, $y, $z) = (1, 2);	x, y, z = 1, 2, 3 # raises ValueError: x, y = 1, 2, 3 # raises ValueError: x, y, z = 1, 2
交换		($x, $y) = ($y, $x);	x, y = y, x
操作符	+= -= *= /=	+= -= = none* /= %= **= .= x= &&= \|\|= ^= <<= >>= &= \|= ^=	# do not return values: += -= = /= //= %= = += = &= \|= ^= <<= >>= &= \|= ^=
自增	@ sum++	my $x = 1; my $y = ++$x; my $z = --$y;	none
局部变量	Set a=v	my $v; my (@a, %d); my $x = 1; my ($y, $z) = (2, 3);	# in function body: v = None a, d = [], {} x = 1 y, z = 2, 3
全局变量	Setenv a v	our ($g1, $g2) = (7, 8); sub swap_globals { ($g1, $g2) = ($g2, $g1); }	g1, g2 = 7, 8 def swap_globals(): global g1, g2 g1, g2 = g2, g1
常量		use constant PI => 3.14;	# uppercase identifiers # constant by convention PI = 3.14
空		undef	None
空测试	$?var “$var” != “”	! defined $v	v == None v is None
访问未定义变量	“”	error under use strict; otherwise undef	raises NameError
真假		1 ""	True False
假		undef 0 0.0 "" "0" ()	False None 0 0.0 '' [] {}
逻辑运算	&& \|\| !	&& \|\| ! lower precedence: and or xor not	and or not
条件		$x > 0 ? $x : -$x	x if x > 0 else -x
比较	== != > < >= <=	numbers only: == != > < >= <= strings: eq ne gt lt ge le	comparison operators are chainable: == != > < >= <=
数学运算
类型转化		7 + "12" 73.9 + ".037" "value: " . 8	7 + int('12') 73.9 + float('.037') 'value: ' + str(8)
算术运算	@ sum = 3 + 5 echo $sum	+ - * / none % **	+ - * / // % **
取余		int ( 13 / 5 ) none	13 // 5 q, r = divmod(13, 5)
浮点除法		13 / 5	float(13) / 5 # Python 3: 13 / 5
数学函数		use Math::Trig qw( tan asin acos atan); sqrt exp log sin cos tan asin acos atan atan2	from math import sqrt, exp, log, \ sin, cos, tan, asin, acos, atan, atan2
四舍五入		# cpan -i Number::Format use Number::Format 'round'; use POSIX qw(ceil floor); int($x) round($x, 0) ceil($x) floor($x) abs($x)	import math int(x) int(round(x)) math.ceil(x) math.floor(x) abs(x)
最大最小		use List::Util qw(min max); min(1,2,3); max(1,2,3); @a = (1,2,3); min(@a); max(@a);	min(1,2,3) max(1,2,3) min([1,2,3]) max([1,2,3])
除0		error	raises ZeroDivisionError
大整数		converted to float; use Math::BigInt to create arbitrary length integers	becomes arbitrary length integer of type long
大浮点数		inf	raises OverflowError
随机数		int(rand() * 100) rand() none	import random random.randint(0,99) random.random() random.gauss(0,1)
随机数		srand 17; my $sd = srand; srand($sd);	import random random.seed(17) sd = random.getstate() random.setstate(sd)
位操作	<< >> & \| ^ ~	<< >> & \| ^ ~	<< >> & \| ^ ~
其他进制		0b101010 052 0x2a	0b101010 052 0x2a
字符串操作
字符串		"don't say \"no\"" 'don\'t say "no"'	'don\'t say "no"' "don't say \"no\"" "don't " 'say "no"' '''don't say "no"''' """don't say "no\""""
多行字符串		yes	triple quote literals only
转义	Double quoted protect: !$` single quoted protect: ! echo “$name”	double quoted: \a \b \cx \e \f \n \r \t \xhh \x{hhhh} \ooo Perl 5.14: \o{ooo} single quoted: \' \\	single and double quoted: \newline \\ \' \" \a \b \f \n \r \t \v \ooo \xhh Python 3: \uhhhh \Uhhhhhhhh
变量替换		my $count = 3; my $item = "ball"; print "$count ${item}s\n";	count = 3 item = 'ball' print(‘%s %s’ % (count, item))
sprintf	Printf “%10.2f%5d\n” 10.4 23	my $fmt = "lorem %s %d %f"; sprintf($fmt, "ipsum", 13, 3.7)	'lorem %s %d %f' % ('ipsum', 13, 3.7) fmt = 'lorem {0} {1} {2}' fmt.format('ipsum', 13, 3.7)
here document	Cat << DONE DONE	$word = "amet"; $s = <<EOF; lorem ipsum dolor sit $word EOF	‘’’ ‘’’
字符串连接		my $s = "Hello, "; my $s2 = $s . "World!";	s = 'Hello, ' s2 = s + 'World!' juxtaposition can be used to concatenate literals: s2 = 'Hello, ' "World!"
字符串复制		my $hbar = "-" x 80;	hbar = '-' * 80
字符串分隔		split(/\s+/, "do re mi fa") split(/\s+/, "do re mi fa", 2) split(/(\s+)/, "do re mi fa"); split(//, "abcd")	'do re mi fa'.split() 'do re mi fa'.split(None, 1) re.split('(\s+)', 'do re mi fa') list('abcd')
字符串连接		join(" ", qw(do re mi fa))	' '.join(['do', 're', 'mi', 'fa'])
字符串大小写		uc("lorem") lc("LOREM") ucfirst("lorem")	'lorem'.upper() 'LOREM'.lower() 'lorem'.capitalize()
字符串strip		# cpan -i Text::Trim use Text::Trim; trim " lorem " ltrim " lorem" rtrim "lorem "	' lorem '.strip() ' lorem'.lstrip() 'lorem '.rstrip()
字符串格式化		sprintf("%-10s", "lorem") sprintf("%10s", "lorem")	'lorem'.ljust(10) 'lorem'.rjust(10)
字符串长度		length("lorem")	len('lorem')
字符串index		index("lorem ipsum", "ipsum") rindex("do re re", "re") return -1 if not found	'do re re'.index('re') 'do re re'.rindex('re') raise ValueError if not found
子字符串		substr("lorem ipsum", 6, 5)	'lorem ipsum'[6:11]
访问字符串中字母		can't use index notation with strings: substr("lorem ipsum", 6, 1)	'lorem ipsum'[6]
字母数字转化		chr(65) ord("A")	chr(65) ord('A')
正则表达式
字符串或		/lorem\|ipsum/ qr(/etc/hosts)	re.compile('lorem\|ipsum') none
特殊字符		char class abbrevs: . \d \D \h \H \s \S \v \V \w \W anchors: ^ $ \A \b \B \z \Z	char class abbrevs: . \d \D \s \S \w \W anchors: ^ $ \A \b \B \Z
正则表达式匹配	=~ !~	if ($s =~ /1999/) { print "party!\n"; }	if re.search('1999', s): print('party!')
忽略大小写		"Lorem" =~ /lorem/i	re.search('lorem', 'Lorem', re.I)
选项		i m s p x	re.I re.M re.S re.X
替换		my $s = "do re mi mi mi"; $s =~ s/mi/ma/g;	s = 'do re mi mi mi' s = re.compile('mi').sub('ma', s)
group		$rx = qr/(\d{4})-(\d{2})-(\d{2})/; "2010-06-03" =~ $rx; ($yr, $mo, $dy) = ($1, $2, $3);	rx = '(\d{4})-(\d{2})-(\d{2})' m = re.search(rx, '2010-06-03') yr, mo, dy = m.groups()
findall		my $s = "dolor sit amet"; @a = $s =~ m/\w+/g;	s = 'dolor sit amet' a = re.findall('\w+', s)
匹配引用		"do do" =~ /(\w+) \1/ my $s = "do re"; $s =~ s/(\w+) (\w+)/$2 $1/;	none rx = re.compile('(\w+) (\w+)') rx.sub(r'\2 \1', 'do re')
日期时间
日期时间类型		Time::Piece if use Time::Piece in effect, otherwise tm array	datetime.datetime
当前日期时间		use Time::Piece; my $t = localtime(time); my $utc = gmtime(time);	import datetime t = datetime.datetime.now() utc = datetime.datetime.utcnow()
与epoch转化		use Time::Local; use Time::Piece; my $epoch = timelocal($t); my $t2 = localtime(1304442000);	from datetime import datetime as dt epoch = int(t.strftime("%s")) t2 = dt.fromtimestamp(1304442000)
当前epoch		$epoch = time;	import datetime t = datetime.datetime.now() epoch = int(t.strftime("%s"))
strftime		use Time::Piece; $t = localtime(time); $fmt = "%Y-%m-%d %H:%M:%S"; print $t->strftime($fmt);	t.strftime('%Y-%m-%d %H:%M:%S')
默认格式		Tue Aug 23 19:35:19 2011	2011-08-23 19:35:59.411135
字符串转为时间strptime		use Time::Local; use Time::Piece; $s = "2011-05-03 10:00:00"; $fmt = "%Y-%m-%d %H:%M:%S"; $t = Time::Piece->strptime($s,$fmt);	from datetime import datetime s = '2011-05-03 10:00:00' fmt = '%Y-%m-%d %H:%M:%S' t = datetime.strptime(s, fmt)
解析日期		# cpan -i Date::Parse use Date::Parse; $epoch = str2time("July 7, 1999");	# pip install python-dateutil import dateutil.parser s = 'July 7, 1999' t = dateutil.parser.parse(s)
时间差		Time::Seconds object if use Time::Piece in effect; not meaningful to subtract tm arrays	datetime.timedelta object
时间运算		use Time::Seconds; $now = localtime(time); $now += 10 * ONE_MINUTE() + 3;	import datetime delta = datetime.timedelta( minutes=10, seconds=3) t = datetime.datetime.now() + delta
时区		Time::Piece has local timezone if created withlocaltime and UTC timezone if created with gmtime; tm arrays have no timezone or offset info	a datetime object has no timezone information unless a tzinfo object is provided when it is created
timezone name; offset from UTC; 是否夏令时		# cpan -i DateTime use DateTime; use DateTime::TimeZone; $dt = DateTime->now(); $tz = DateTime::TimeZone->new( name=>"local"); $tz->name; $tz->offset_for_datetime($dt) / 3600; $tz->is_dst_for_datetime($dt);	import time tm = time.localtime() time.tzname[tm.tm_isdst] (time.timezone / -3600) + tm.tm_isdst tm.tm_isdst
microseconds		use Time::HiRes qw(gettimeofday); ($sec, $usec) = gettimeofday;	t.microsecond
sleep		a float argument will be truncated to an integer: sleep 1;	import time time.sleep(0.5)
timeout		eval { $SIG{ALRM}= sub {die "timeout!";}; alarm 5; sleep 10; }; alarm 0;	import signal, time class Timeout(Exception): pass def timeout_handler(signo, fm): raise Timeout() signal.signal(signal.SIGALRM, timeout_handler) try: signal.alarm(5) time.sleep(10) except Timeout: pass signal.alarm(0)
数组
定义	A = (ss,re,mi)	@a = (1, 2, 3, 4);	a = [1, 2, 3, 4]
quote words	a = (“ss re mi”)	@a = qw(do re mi);	none
长度	$#a	$#a + 1 or scalar(@a)	len(a)
空测试	! $a	!@a	not a
使用	$a[0]	$a[0]	a[0]
更新		$a[0] = "lorem";	a[0] = 'lorem'
越界访问		@a = (); evaluates as undef: $a[10]; increases array size to 11: $a[10] = "lorem";	a = [] raises IndexError: a[10] raises IndexError: a[10] = 'lorem'
index		use List::Util 'first'; @a = qw(x y z w); $i = first {$a[$_] eq "y"} (0..$#a);	a = ['x', 'y', 'z', 'w'] i = a.index('y')
子数组		select 3rd and 4th elements: @a[2..3] splice(@a, 2, 2)	select 3rd and 4th elements: a[2:4] none
子数组		@a[1..$#a]	a[1:]
添加删除		@a = (6,7,8); push @a, 9; pop @a;	a = [6,7,8] a.append(9) a.pop()
插入删除	shift	@a = (6,7,8); unshift @a, 5; shift @a;	a = [6,7,8] a.insert(0,5) a.pop(0)
数组连接		@a = (1,2,3); @a2 = (@a,(4,5,6)); push @a, (4,5,6);	a = [1,2,3] a2 = a + [4,5,6] a.extend([4,5,6])
初始化		@a = (undef) x 10;	a = [None] * 10 a = [None for i in range(0, 10)]
浅拷贝深拷贝		use Storable 'dclone' my @a = (1,2,[3,4]); my $a2 = \@a; my @a3 = @a; my @a4 = @{dclone(\@a)};	import copy a = [1,2,[3,4]] a2 = a a3 = list(a) a4 = copy.deepcopy(a)
数组作为函数参数		each element passed as separate argument; use reference to pass array as single argument	parameter contains address copy
遍历		for $i (1, 2, 3) { print "$i\n" }	for i in [1,2,3]: print(i)
遍历		none; use range iteration from 0 to $#a and use index to look up value in the loop body	a = ['do', 're', 'mi', 'fa'] for i, s in enumerate(a): print('%s at index %d' % (s, i))
range		for $i (1..1_000_000) { code }	range replaces xrange in Python 3: for i in xrange(1, 1000001): code
range数组		@a = 1..10;	a = range(1, 11) Python 3: a = list(range(1, 11))
翻转		@a = (1,2,3); reverse @a; @a = reverse @a;	a = [1,2,3] a[::-1] a.reverse()
排序		@a = qw(b A a B); sort @a; @a = sort @a; sort { lc($a) cmp lc($b) } @a;	a = ['b', 'A', 'a', 'B'] sorted(a) a.sort() a.sort(key=str.lower)
去重复		use List::MoreUtils 'uniq'; my @a = (1,2,2,3); my @a2 = uniq @a; @a = uniq @a;	a = [1,2,2,3] a2 = list(set(a)) a = list(set(a))
是否存在于数组		7 ~~ @a	7 in a
集合交集			{1,2} & {2,3,4}
集合或			{1,2} \| {2,3,4}
集合运算			{1,2,3} - {2} {1,2} ^ {2,3,4}
map		map { $_ * $_ } (1,2,3)	map(lambda x: x * x, [1,2,3]) # or use list comprehension: [x*x for x in [1,2,3]]
filter		grep { $_ > 1 } (1,2,3)	filter(lambda x: x > 1, [1,2,3]) # or use list comprehension: [x for x in [1,2,3] if x > 1]
reduce		use List::Util 'reduce'; reduce { $x + $y } 0, (1,2,3)	# import needed in Python 3 only from functools import reduce reduce(lambda x, y: x+y, [1,2,3], 0)
All/any		# cpan -i List::MoreUtils use List::MoreUtils qw(all any); all { $_ % 2 == 0 } (1,2,3,4) any { $_ % 2 == 0 } (1,2,3,4)	all(i%2 == 0 for i in [1,2,3,4]) any(i%2 == 0 for i in [1,2,3,4])
shuffle and sample		use List::Util 'shuffle'; @a = (1, 2, 3, 4); shuffle(@a); none	from random import shuffle, sample a = [1, 2, 3, 4] shuffle(a) sample(a, 2)
zip		# cpan -i List::MoreUtils use List::MoreUtils 'zip'; @nums = (1, 2, 3); @lets = qw(a b c); # flat array of 6 elements: @a = zip @nums, @lets;	# array of 3 pairs: a = zip([1,2,3], ['a', 'b', 'c'])
字典对象
定义		%d = ( t => 1, f => 0 );	d = { 't':1, 'f':0 }
size		scalar(keys %d)	len(d)
lookup		$d{"t"}	d['t']
out-of-bounds behavior		%d = (); evaluates as undef: $d{"lorem"}; adds key/value pair: $d{"lorem"} = "ipsum";	d = {} raises KeyError: d['lorem'] adds key/value pair: d['lorem'] = 'ipsum'
is key present		exists $d{"y"}	'y' in d
delete entry		%d = ( 1 => "t", 0 => "f" ); delete $d{1};	d = {1: True, 0: False} del d[1]
from array of pairs, from even length array		@a = (1,"a",2,"b",3,"c"); %d = @a;	a = [[1,'a'], [2,'b'], [3,'c']] d = dict(a) a = [1,'a',2,'b',3,'c'] d = dict(zip(a[::2], a[1::2]))
merge		%d1 = (a=>1, b=>2); %d2 = (b=>3, c=>4); %d1 = (%d1, %d2);	d1 = {'a':1, 'b':2} d2 = {'b':3, 'c':4} d1.update(d2) # {'a': 1, 'c': 4, 'b': 3}
invert		%to_num = (t=>1, f=>0); %to_let = reverse %to_num;	to_num = {'t':1, 'f':0} # dict comprehensions added in 2.7: to_let = {v:k for k, v in to_num.items()}
iteration		while ( ($k, $v) = each %d ) { code }	for k, v in d.iteritems(): code Python 3: for k, v in d.items(): code
keys and values as arrays		keys %d values %d	d.keys() d.values() Python 3: list(d.keys()) list(d.values())
default value, computed value		my %counts; $counts{'foo'} += 1 define a tied hash for computed values and defaults other than zero or empty string	from collections import defaultdict counts = defaultdict(lambda: 0) counts['foo'] += 1 class Factorial(dict): def __missing__(self, k): if k > 1: return k * self[k-1] else: return 1 factorial = Factorial()
函数
函数申明	Label: goto label	sub add { $_[0] + $_[1] } sub add { my ($a, $b) = @_; $a + $b; }	def add(a, b): return a+b
函数调用		add(1, 2); parens are optional: add 1, 2;	add(1, 2)
参数丢失		set to undef	raises TypeError
参数默认值		sub my_log { my $x = shift; my $base = shift // 10; log($x)/log($base); } my_log(42); my_log(42, exp(1));	import math def my_log(x, base=10): return math.log(x)/math.log(base) my_log(42) my_log(42, math.e)
变长参数		sub foo { if ( @_ >= 1 ) { print "first: $_[0]\n"; } if ( @_ >= 2 ) { print "last: $_[-1]\n"; } }	def foo(*a): if len(a) >= 1: print('first: ' + str(a[0])) if len(a) >= 2: print('last: ' + str(a[-1]))
命名参数		none	def fequal(x, y, opts): eps = opts.get('eps') or 0.01 return abs(x - y) < eps fequal(1.0, 1.001) fequal(1.0, 1.001, eps=0.110)
pass number or string by reference		sub foo { $_[0] += 1; $_[1] .= "ly"; } my $n = 7; my $s = "hard"; foo($n, $s);	not possible
pass array or dictionary by reference		sub foo { $_[0][2] = 5; $_[1]{"f"} = -1; } my @a = (1,2,3); my %d = ("t"=> 1, "f" => 0); foo(\@a, \%d);	def foo(x, y): x[2] = 5 y['f'] = -1 a = [1,2,3] d = {'t':1, 'f':0} foo(a, d)
return value		return arg or last expression evaluated	return arg or None
multiple return values		sub first_and_second { return ($_[0], $_[1]); } @a = (1,2,3); ($x, $y) = first_and_second(@a);	def first_and_second(a): return a[0], a[1] x, y = first_and_second([1,2,3])
lambda declaration		$sqr = sub { $_[0] * $_[0] }	body must be an expression: sqr = lambda x: x * x
lambda invocation		$sqr->(2)	sqr(2)
function reference		my $func = \&add;	func = add
function with private state		use feature state; sub counter { state $i = 0; ++$i; } print counter() . "\n";	# state not private: def counter(): counter.i += 1 return counter.i counter.i = 0 print(counter())
closure		sub make_counter { my $i = 0; return sub { ++$i }; } my $nays = make_counter; print $nays->() . "\n";	# Python 3: def make_counter(): i = 0 def counter(): nonlocal i i += 1 return i return counter nays = make_counter()
generator		none	def make_counter(): i = 0 while True: i += 1 yield i nays = make_counter() print(nays.next())
decorator			def logcall(f): def wrapper(a, opts): print('calling ' + f.__name__) f(a, *opts) print('called ' + f.__name__) return wrapper @logcall def square(x): return x x square(5)
流程控制
if	If($#argv == 0) then echo “AAA” else if($#argv == 1) then Echo “BBB” Else Echo “ccc” endif if{(who \| grep aaa)} then Echo “q” endif	if ( 0 == $n ) { print "no hits\n" } elsif ( 1 == $n ) { print "one hit\n" } else { print "$n hits\n" }	if 0 == n: print('no hits') elif 1 == n: print('one hit') else: print(str(n) + ' hits')
switch	Switch(`uname –s`) Case SunOS: Echo SunOS Breaksw Case HP*: Echo HP-UX Breaksw Case Linux: Echo Linux Breaksw endsw	use feature 'switch'; given ($n) { when (0) { print "no hits\n"; } when (1) { print "one hit\n"; } default { print "$n hits\n"; } }	none
while	Set num = 0 While($sum <10) Echo $sum @ num++ end	while ( $i < 100 ) { $i++ }	while i < 100: i += 1
c-style for		for ( $i=0; $i <= 10; $i++ ) { print "$i\n"; }	none
Foreach	Foreach person (bob sam sue) Mail $person < letter end	@a = (1..5); foreach (@a) { print "$_\n"; } @a = (1..5); for (@a) { print "$_\n" }	a = ['do', 're', 'mi', 'fa'] for i, s in enumerate(a): print('%s at index %d' % (s, i)) for i in [1,2,3]: print(i)
break, continue, redo	Break continue while($#argv) Echo $argv Shift end	last next redo	break continue none
control structure keywords		do else elsif for foreach goto if unless until while	elif else for if while
what do does		executes following block and returns value of last statement executed	raises NameError unless a value was assigned to it
statement modifiers		print "positive\n" if $i > 0; print "nonzero\n" unless $i == 0;	none
raise exception		die "bad arg";	raise Exception('bad arg')
catch exception		eval { risky }; if ($@) { print "risky failed: $@\n"; }	try: risky() except: print('risky failed')
global variable for last exception		$EVAL_ERROR: $@ $OS_ERROR: $! $CHILD_ERROR: $?	last exception: sys.exc_info()[1]
define exception		none	class Bam(Exception): def __init__(self): super(Bam, self).__init__('bam!')
catch exception by type		none	try: raise Bam() except Bam as e: print(e)
finally/ensure		none	acquire_resource() try: risky() finally: release_resource()
start thread		use threads; $func = sub { sleep 10 }; $thr = threads->new($func);	class sleep10(threading.Thread): def run(self): time.sleep(10) thr = sleep10() thr.start()
wait on thread		$thr->join;	thr.join()
文件和输出
print to standard output	Echo “hello world\n”	print "Hello, World!\n";	print('Hello, World!')
read from standard input	Set a = $<	$line = <STDIN>;	line = sys.stdin.readline()
standard file handles	&1 &2 &3	STDIN STDOUT STDERR	sys.stdin sys.stdout sys.stderr
open file		open my $f, "/etc/hosts"; or open FILE, "/etc/hosts";	f = open('/etc/hosts')
open file for writing		open my $f, ">/tmp/perl_test"; or open FILE, ">/tmp/perl_test";	f = open('/tmp/test', 'w')
open file for append			with open('/tmp/test') as f: f.write('lorem ipsum\n')
close file		close $f; or close FILE;	f.close()
read line		$line = <$f>; or $line = <FILE>;	f.readline()
iterate over file by line		while ($line = <$f>) {	for line in f:
chomp		chomp $line;	line = line.rstrip('\r\n')
read entire file into array or string		@a = <$f>; $s = do { local $/; <$f> };	a = f.readlines() s = f.read()
write to file		print $f "lorem ipsum";	f.write('lorem ipsum')
flush file handle		use IO::Handle; $f->flush();	f.flush()
file test, regular file test	If (-e file) then echo file exists Endif -d –e –f –o –r –w –x –z if { test –b file} echo block device file -b –g –u -p	If (-e "/etc/hosts") {print exist;} -f "/etc/hosts"	os.path.exists('/etc/hosts') os.path.isfile('/etc/hosts')
copy file, remove file, rename file		use File::Copy; copy("/tmp/foo", "/tmp/bar"); unlink "/tmp/foo"; move("/tmp/bar", "/tmp/foo"); unlink();	import shutil shutil.copy('/tmp/foo', '/tmp/bar') os.remove('/tmp/foo') shutil.move('/tmp/bar', '/tmp/foo') os.remove()
set file permissions		chmod 0755, "/tmp/foo";	os.chmod('/tmp/foo', 0755)
temporary file		use File::Temp; $f = File::Temp->new(); print $f "lorem ipsum\n"; close $f; print "tmp file: "; print $f->filename . "\n";	import tempfile f = tempfile.NamedTemporaryFile( prefix='foo') f.write('lorem ipsum\n') f.close() print("tmp file: %s" % f.name)
in memory file		my ($f, $s); open($f, ">", \$s); print $f "lorem ipsum\n"; $s;	from StringIO import StringIO f = StringIO() f.write('lorem ipsum\n') s = f.getvalue() Python 3 moved StringIO to the io module
目录操作
build pathname		use File::Spec; File::Spec->catfile("/etc", "hosts")	os.path.join('/etc', 'hosts')
dirname and basename	$pathvar:r - dirname $pathvar:h -basename $pathvar:t -filename $pathvar:e -extension	use File::Basename; print dirname("/etc/hosts"); print basename("/etc/hosts");	os.path.dirname('/etc/hosts') os.path.basename('/etc/hosts')
absolute pathname		use Cwd; Cwd::abs_path("..")	os.path.abspath('..')
iterate over directory by file		use File::Basename; while ( </etc/*> ) { print basename($_) . "\n"; }	for filename in os.listdir('/etc'): print(filename)
make directory		use File::Path 'make_path'; make_path "/tmp/foo/bar";	dirname = '/tmp/foo/bar' if not os.path.isdir(dirname): os.makedirs(dirname)
recursive copy		# cpan -i File::Copy::Recursive use File::Copy::Recursive 'dircopy'; dircopy "/tmp/foodir", "/tmp/bardir";	import shutil shutil.copytree('/tmp/foodir', '/tmp/bardir')
remove empty directory		rmdir "/tmp/foodir";	os.rmdir('/tmp/foodir')
remove directory and contents		use File::Path 'remove_tree'; remove_tree "/tmp/foodir";	import shutil shutil.rmtree('/tmp/foodir')
directory test		-d "/tmp"	os.path.isdir('/tmp')
命令行操作
command line args, script name	$#argv $0,$1…${10}… $argv[1]…$argv[$#argv]	scalar(@ARGV) $ARGV[0] $ARGV[1] etc $0	len(sys.argv)-1 sys.argv[1] sys.argv[2] etc sys.argv[0]
getopt		use Getopt::Long; my ($src, $help); sub usage { print "usage: $0 --f SRC\n"; exit -1; } GetOptions("file=s" => \$src, "help" => \$help); usage if $help;	import argparse parser = argparse.ArgumentParser() parser.add_argument('--file', '-f', dest='file') args = parser.parse_args() src = args.file
get and set environment variable	$HOME setenv HOME /bin	$ENV{"HOME"} $ENV{"PATH") = "/bin";	os.getenv('HOME') os.environ['PATH'] = '/bin'
exit		exit 0;	sys.exit(0)
set signal handller	Onintr finish # for ctrl+c < script continues here> Finish: Onintr - # disable further interrupts Echo cleaning temp file Exit 1	$SIG{INT} = sub { die "exiting…\n"; };	import signal def handler(signo, frame): print('exiting…') exit -1 signal.signal(signal.SIGINT, handler)
executable test		-x "/bin/ls"	os.access('/bin/ls', os.X_OK)
external command		system("ls -l /tmp") == 0 or die "ls failed";	if os.system('ls -l /tmp'): raise Exception('ls failed')
escaped external command		$path = <>; chomp($path); system("ls", "-l", $path) == 0 or die "ls failed";	import subprocess cmd = ['ls', '-l', '/tmp'] if subprocess.call(cmd): raise Exception('ls failed')
backticks	`ls -l /tmp`;	my $files = `ls -l /tmp`; or my $files = qx(ls);	import subprocess cmd = ['ls', '-l', '/tmp'] files = subprocess.check_output(cmd)
__________________________________________

完！

本文链接

漂亮的HTML表格

2012-04-25T13:49:00Z

原文： http://www.textfixer.com/resources/css-tables.php#css-table01

一个像素边框的表格：

Info Header 1	Info Header 2	Info Header 3
Text 1A	Text 1B	Text 1C
Text 2A	Text 2B	Text 2C

代码如下：

<style type="text/css">
table.gridtable {
    font-family: verdana,arial,sans-serif;
    font-size:11px;
    color:#333333;
    border-width: 1px;
    border-color: #666666;
    border-collapse: collapse;
}
table.gridtable th {
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #666666;
    background-color: #dedede;
}
table.gridtable td {
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #666666;
    background-color: #ffffff;
}
</style>


<table class="gridtable">
<tr>
    <th>Info Header 1</th><th>Info Header 2</th><th>Info Header 3</th>
</tr>
<tr>
    <td>Text 1A</td><td>Text 1B</td><td>Text 1C</td>
</tr>
<tr>
    <td>Text 2A</td><td>Text 2B</td><td>Text 2C</td>
</tr>
</table>

有背景图片的表格：

Info Header 1	Info Header 2	Info Header 3
Text 1A	Text 1B	Text 1C
Text 2A	Text 2B	Text 2C

代码如下：

<style type="text/css">
table.imagetable {
    font-family: verdana,arial,sans-serif;
    font-size:11px;
    color:#333333;
    border-width: 1px;
    border-color: #999999;
    border-collapse: collapse;
}
table.imagetable th {
    background:#b5cfd2 url('cell-grey.jpg');
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #999999;
}
table.imagetable td {
    background:#dcddc0 url('cell-grey.jpg');
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #999999;
}
</style>


<table class="imagetable">
<tr>
    <th>Info Header 1</th><th>Info Header 2</th><th>Info Header 3</th>
</tr>
<tr>
    <td>Text 1A</td><td>Text 1B</td><td>Text 1C</td>
</tr>
<tr>
    <td>Text 2A</td><td>Text 2B</td><td>Text 2C</td>
</tr>
</table>

间隔彩色行表格：

Info Header 1	Info Header 2	Info Header 3
Text 1A	Text 1B	Text 1C
Text 2A	Text 2B	Text 2C
Text 3A	Text 3B	Text 3C
Text 4A	Text 4B	Text 4C
Text 5A	Text 5B	Text 5C

代码如下：

<script type="text/javascript">
function altRows(id){
    if(document.getElementsByTagName){

        var table = document.getElementById(id);
        var rows = table.getElementsByTagName("tr");

        for(i = 0; i < rows.length; i++){
            if(i % 2 == 0){
                rows[i].className = "evenrowcolor";
            }else{
                rows[i].className = "oddrowcolor";
            }
        }
    }
}

window.onload=function(){
    altRows('alternatecolor');
}
</script>


<style type="text/css">
table.altrowstable {
    font-family: verdana,arial,sans-serif;
    font-size:11px;
    color:#333333;
    border-width: 1px;
    border-color: #a9c6c9;
    border-collapse: collapse;
}
table.altrowstable th {
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #a9c6c9;
}
table.altrowstable td {
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #a9c6c9;
}
.oddrowcolor{
    background-color:#d4e3e5;
}
.evenrowcolor{
    background-color:#c3dde0;
}
</style>


<table class="altrowstable" id="alternatecolor">
<tr>
    <th>Info Header 1</th><th>Info Header 2</th><th>Info Header 3</th>
</tr>
<tr>
    <td>Text 1A</td><td>Text 1B</td><td>Text 1C</td>
</tr>
<tr>
    <td>Text 2A</td><td>Text 2B</td><td>Text 2C</td>
</tr>
</tr>
<tr>
    <td>Text 3A</td><td>Text 3B</td><td>Text 3C</td>
</tr>
<tr>
    <td>Text 4A</td><td>Text 4B</td><td>Text 4C</td>
</tr>
<tr>
    <td>Text 5A</td><td>Text 5B</td><td>Text 5C</td>
</tr>
</table>

鼠标停留时高亮行的表格：

Info Header 1	Info Header 2	Info Header 3
Item 1A	Item 1B	Item 1C
Item 2A	Item 2B	Item 2C
Item 3A	Item 3B	Item 3C
Item 4A	Item 4B	Item 4C
Item 5A	Item 5B	Item 5C

代码如下：

<style type="text/css">
table.hovertable {
    font-family: verdana,arial,sans-serif;
    font-size:11px;
    color:#333333;
    border-width: 1px;
    border-color: #999999;
    border-collapse: collapse;
}
table.hovertable th {
    background-color:#c3dde0;
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #a9c6c9;
}
table.hovertable tr {
    background-color:#d4e3e5;
}
table.hovertable td {
    border-width: 1px;
    padding: 8px;
    border-style: solid;
    border-color: #a9c6c9;
}
</style>


<table class="hovertable">
<tr>
    <th>Info Header 1</th><th>Info Header 2</th><th>Info Header 3</th>
</tr>
<tr onmouseover="this.style.backgroundColor='#ffff66';" onmouseout="this.style.backgroundColor='#d4e3e5';">
    <td>Item 1A</td><td>Item 1B</td><td>Item 1C</td>
</tr>
<tr onmouseover="this.style.backgroundColor='#ffff66';" onmouseout="this.style.backgroundColor='#d4e3e5';">
    <td>Item 2A</td><td>Item 2B</td><td>Item 2C</td>
</tr>
<tr onmouseover="this.style.backgroundColor='#ffff66';" onmouseout="this.style.backgroundColor='#d4e3e5';">
    <td>Item 3A</td><td>Item 3B</td><td>Item 3C</td>
</tr>
<tr onmouseover="this.style.backgroundColor='#ffff66';" onmouseout="this.style.backgroundColor='#d4e3e5';">
    <td>Item 4A</td><td>Item 4B</td><td>Item 4C</td>
</tr>
<tr onmouseover="this.style.backgroundColor='#ffff66';" onmouseout="this.style.backgroundColor='#d4e3e5';">
    <td>Item 5A</td><td>Item 5B</td><td>Item 5C</td>
</tr>
</table>

完！

本文链接

Python实例31[批量对目录下文件重命名]

2012-04-22T02:06:00Z

经常会遇到下载的文件或电子书，名字中间都包含了一些网址信息，实际使用中由于名字太长不方便，下面的脚本使用正则表达式来对目录下的所有文件重命名：
例如：

修改前：[大家网]Mac OS X for Unix Geeks[www.TopSage.com].mobi
修改后：Mac OS X for Unix Geeks.mobi

python代码如下

import os
import re

def rename_dir(dir,regex,f):
  if not os.path.isdir(dir) or not os.path.exists(dir) :
    print("The input is not one directory or not exist.")
  for root,subdirs,files in os.walk(dir):
    for name in files:
      oldname = name
      newname = re.sub(regex,f,name)
      print("Before : " + os.path.join(root,oldname))
      print("After :  " + os.path.join(root,newname))
      if not name == newname and not os.path.exists(os.path.join(root,newname)):
        os.rename(os.path.join(root,oldname),os.path.join(root,newname))
    for dir in subdirs:
        rename_dir(os.path.join(root,dir))

rename_dir("C:\\Python31\\test","\[.*\](.*)\[www.TopSage.com\](.*)",lambda m:m.group(1)+m.group(2))

用perl写了下，感觉代码也没有少写多少

use strict;
use warnings;
use File::Find;

my $regex = "\\[.*\\](.*)\\[www.TopSage.com\\](.*)";
# $replace doesn't work
my $replace = "\$1\$2";

sub wanted {
my $name = $File::Find::name;
if( -f $name){
   my $newname =$name;
   $newname =~ s/$regex/$1$2/;
   print "Before: $File::Find::name\n";
   print "After : $newname\n";
   if( !-e $newname) {
     rename($name, $newname);
   }
}
}

sub rename_dir{
  my ($dir,) = @_;
  if (!-d $dir || !-e $dir){
    print"The input is not directory or not exist.";
  }
  find(\&wanted, $dir);
}
&rename_dir("c:\\perl\\test");

perl 实现2

use strict;
use warnings;

my $regex = "\\[.*\\](.*)\\[www.TopSage.com\\](.*)";
# $replace doesn't work
my $replace = "\$1\$2";

sub rename_dir{
    my $dir = shift;
    if (!-d $dir || !-e $dir){
      print"The input is not directory or not exist.";
    }
    opendir(DIR, $dir) || die "Cannot opendir $dir.";
    foreach (readdir(DIR)) {
      if ($_ eq '.' || $_ eq '..') {next;}
      my $name = $dir.'/'.$_;
      if(-d $name){
        rename_dir($name);
        next;
        }
      my $newname =$_;
      $newname =~ s/$regex/$1$2/;
      $newname = $dir.'/'.$newname;
      print "Before : $name\n";
      print "After  : $newname\n";
      rename($name,$newname);
    }
    #closedir(DIR);
}
&rename_dir("c:\\perl\\test");

完！

本文链接

Perforce查看workspace sync到的changlist

2012-04-21T04:44:00Z

一查看workspace sync到的changelist

perforce的workspace其实是一些特定版本的文件的结合，相比只将workspace对应到某个特定的changelist，此方法更灵活。changelist和文件间的关系为：每个changelist其实是某些特定版本文件的集合，但是并不是所有的版本的文件结合都对应到一个changelist。perforce允许用户将workspace同步到文件的某些特定版本，不一定对应一个chagnelist。

使用如下三步来确定workspace的最新状态

p4 changes 命令可以查看workspace中文件集合所对应的最高chagnelist：

p4 changes -m1 //...#have

可以使用如下命令查看workspace中是否所有的文件都被sync到了最高changelist：

p4 sync -n @<changelist retuned by p4 changes>

如果以上命令显示所有的文件都已经是updated，则表示workspace当前被sync到了最高changelist。

同时使用如下命令来确保没有文件被修改但是还没有提交：

p4 opened

注意如下的depot语法是等价的：

//<workspace name>/...

//...@<workspace name>

//...#have

所以从perforce的官方的knowledgebase中看到的命令是p4 changes -m1 //...@<workspace name>

有的时候如果文件太多的话，会出现错误，可以使用如下方法：

$ p4 changes -m1 "./...#have"

Request too large (over 850000); see 'p4 help maxresults'.

$ p4 -G files "./...#have" | python c:/cygwin/usr/local/bin/p4lastchange.py Files: 266948 2427657

p4lastchange.py

#! /usr/bin/env python

import sys, os, marshal

if os.name == "nt":

# Disable newline translation in Windows. Other operating systems do not

# translate file contents.

import msvcrt

msvcrt.setmode( sys.stdin.fileno(), os.O_BINARY )

lastcl = 0

num = 0

try:

while 1:

dict = marshal.load(sys.stdin)

num = num + 1

for key in dict.keys():

# print "%s: %s" % (key,dict[key])

if key == "change":

cl = int(dict[key])

if cl > lastcl:

lastcl = cl

except EOFError:

pass

print "Files: %s" % num

print lastcl

二 p4 cstat

cstat -- Dump change/sync status for current client

p4 cstat [files...]

Lists changes that are needed, had or partially synced in the current client. The output is returned in tagged format, similar to the fstat command. The fields that cstat displays are:

change changelist number status 'have', 'need' or 'partial'

p4 changes的更多使用

p4 changes -m 5 //depot/project/...	Show the last five submitted changelists that include any file under the project directory
p4 changes -m 5 -c eds_elm	Show the last five submitted changelists from client workspace eds_elm.
p4 changes -m 5 -u edk	Show the last five submitted changelists from user edk.
p4 changes file.c@2000/05/01,2000/06/01	Show any changelists that include file file.c, as mapped to the depot through the client view, during the month of May 2000.
p4 changes -m 1 -s submitted	Output a single line showing the changelist number of the last submitted changelist.
p4 changes @2001/04/01,@now	Display all changelists submitted from April 1, 2001 to the present.
p4 changes @2001/04/01	Display all changelists submitted before April 1, 2000.

参考：
http://p4t3.lollotec.com/2008/01/what-changelist-is-my-workspace-synced.html

http://stackoverflow.com/questions/47007/determining-the-last-changelist-synced-to-in-perforce

http://kb.perforce.com/?article=51

http://www.perforce.com/perforce/doc.current/manuals/cmdref/changes.html

完！

本文链接

Linux任务前后台的切换

2012-04-19T10:09:00Z

Linux任务前后台的切换

Shell支持作用控制，有以下命令实现前后台切换：

1. command& 让进程在后台运行

2. jobs 查看后台运行的进程

3. fg %n 让后台运行的进程n到前台来

4. bg %n 让进程n到后台去；

PS:"n"为jobs命令查看到的job编号，不是进程编号.

fg、bg、jobs、&、ctrl + z都是跟系统任务有关的，虽然现在基本上不怎么需要用到这些命令，但学会了也是很实用的.

一、& 最经常被用到

这个用在一个命令的最后，可以把这个命令放到后台执行

二、ctrl + z

可以将一个正在前台执行的命令放到后台，并且暂停

三、jobs

查看当前有多少在后台运行的命令

四、fg

将后台中的命令调至前台继续运行

如果后台中有多个命令，可以用 fg %jobnumber将选中的命令调出，%jobnumber是通过jobs命令查到的后台正在执行的命令的序号(不是pid)。

五、bg

将一个在后台暂停的命令，变成继续执行

如果后台中有多个命令，可以用bg %jobnumber将选中的命令调出，%jobnumber是通过jobs命令查到的后台正在执行的命令的序号(不是pid)。

实例：

假设你发现前台运行的一个程序需要很长的时间，但是需要干其他的事情，你就可以用 Ctrl-Z ，终止这个程序，然后可以看到系统提示：

[1]+ Stopped /root/bin/rsync.sh

如果没有此提示，则用 jobs 命令查看任务：

#jobs

[1]+ suspended /root/bin/rsync.sh &

然后我们可以把程序调度到后台执行：（bg 后面的数字为作业号）

#bg 1

[1]+ /root/bin/rsync.sh &

用 jobs 命令查看正在运行的任务：

#jobs

[1]+ Running /root/bin/rsync.sh &

如果想把它调回到前台运行，可以用

#fg 1

/root/bin/rsync.sh

这样，你在控制台上就只能等待这个任务完成了。

完！

本文链接

Linux进程的uid和euid

2012-04-01T09:08:00Z

一进程的uid和euid

转自：http://bbs.linuxpk.com/thread-39597-1-1.html

linux系统中每个进程都有2个ID，分别为用户ID（uid）和有效用户ID（euid），UID一般表示进程的创建者（属于哪个用户创建），而EUID表示进程对于文件和资源的访问权限（具备等同于哪个用户的权限）。C语言中，可以通过函数getuid()和geteuid（）来获得进程的两个ID值。

当一个用户登陆系统时，系统会将UID和EUID都赋值为/etc/passwd文件中的UID，一般情况下2个ID是相同的，但是某些情况下会出现2个ID不同的情况。
gid和egid同理。

下面一段C代码将解释区别："printid.c"

#include <stdlib.h>
#include <stdio.h>
#include <unistd.h>
#include <sys/types.h>

int main(void)
{
printf(" UID\t= %d\n", getuid());
printf(" EUID\t= %d\n", geteuid());
printf(" GID\t= %d\n", getgid());
printf(" EGID\t= %d\n", getegid());

return EXIT_SUCCESS;
}

编译之：
aguo@linux-x9rc:~> gcc -o printid printid.c

执行：
aguo@linux-x9rc:~> ./printid
Real UID = 1000
Effective UID = 1000
Real GID = 100
Effective GID = 100

看看/etc/passwd里uid和gid：
aguo@linux-x9rc:~> cat /etc/passwd | grep aguo | awk -F":" '{print "uid:"$3 "\tgid:"$4}'
uid:1000 gid:100

以上是相同的例子。

下面演示uid和euid不同的例子。
首先，修改一下文件属性，setuid或setgid
aguo@linux-x9rc:~> chmod u+s printid #这样一来，文件在执行阶段具有文件所有者的权限。
还可以再补充一个：
aguo@linux-x9rc:~> chmod g+s printid #这样一来，文件在执行阶段具有文件所属组的权限。

其次，变成其他用户，再来试验一下，比如变成root；
linux-x9rc:/home/aguo # ./printid
Real UID = 0
Effective UID = 1000
Real GID = 0
Effective GID = 100

看到了吧？uid和euid是有区别的！
以上演示环境：
OS：SuSE Desktop Linux 11
gcc：4.3.2

顺便补充一下：
perl里面的特殊变量$<、$>表示uid euid; $(、$)表示gid egid。
只是，$(和$)会存储一个列表，第一位表示的才是gid和egid，这个是perl的设置，不在本文讨论范围中。

二 passwd 实例

转自：http://keren.blog.51cto.com/720558/144908

【关于linux的passwd命令】

passwd命令是用来修改用户登陆密码的，用来记录用户登陆密码的文件为/etc/shadow，该文件只有root用户具有访问权限，如下所示：

gaolu@gaolu-desktop:~$

gaolu@gaolu-desktop:~$ cd /etc

gaolu@gaolu-desktop:/etc$ ls -l shadow

-rw-r----- 1 root shadow 978 2009-02-22 21:25 shadow

gaolu@gaolu-desktop:/etc$

这是出现了矛盾：出于安全考虑，不允许普通用户查看并修改shadow文件；但是如果这样普通用户就无法为自己修改密码。

Linux系统就是使用setuid来解决这个矛盾的问题：如果一个程序被设置了setuid位，那么它无论被哪个用户启用，都会具备程序所有者的权限。而passwd程序的所有者是root用户，passwd的权限如下所示，那么任何用户执行该程序，程序的EUID就会变成root用户的EUID,而不是执行该程序的UID。

gaolu@gaolu-desktop:/etc$ cd /usr/bin

gaolu@gaolu-desktop:/usr/bin$ ls -l passwd

-rwsr-xr-x 1 root root 32988 2008-06-10 02:10 passwd

gaolu@gaolu-desktop:/usr/bin$

因此，普通用户可以通过passwd程序修改shadow文件内容，完成密码修改。

完！

本文链接