Daily Archives: 一月 7th, 2008

自己写的用于解决wp贴代码空格引号不正确的脚本

2008 一月 7 星期一 16:13 – 16:13

#!/usr/bin/perl
 
 open(TMPFILE,”$ARGV[0]“)||die ”error”;
 open(SHOWFILE,”+>$ARGV[0].txt”)||die ”error”;
 while($line=<TMPFILE>)
 {
   $line =~ s/[<>"']/<code>$&<\/code>/g;
   $line =~ s/ /&nbsp;/g;
   print $line;
 }
 close(TMPFILE);
 close(SHOWFILE);

By zerged | Posted in linux solaris shell eda 以及工作相关 | Comments (0)

正则表达式中的特殊字符

2008 一月 7 星期一 15:49 – 15:49

 http://www.phpe.net/articles/151.shtml
:下表是元字符及其在正则表达式上下文中的行为的一个完整列表：
字符 描述
\
将下一个字符标记为一个特殊字符、或一个原义字符、或一个后向引用、或一个八进制转义符。例如，’n’ 匹配字符 “n”。’\n’ 匹配一个换行符。序列 ‘\’ 匹配 “” 而 “\(” 则匹配 “(”。
^
匹配输入字符串的开始位置。如果设置了 RegExp 对象的 Multiline 属性，^ 也匹配 ‘\n’ 或 ‘\r’ 之后的位置。
$
匹配输入字符串的结束位置。如果设置了RegExp 对象的 Multiline 属性，$ 也匹配 ‘\n’ 或 ‘\r’ 之前的位置。
*
匹配前面的子表达式零次或多次。例如，zo* 能匹配 “z” 以及 “zoo”。 * 等价于{0,}。
+ 匹配前面的子表达式一次或多次。例如，’zo+’ 能匹配 “zo” 以及 “zoo”，但不能匹配 “z”。+ 等价于 {1,}。
?
匹配前面的子表达式零次或一次。例如，”do(es)?” 可以匹配 “do” 或 “does” 中的”do” 。? 等价于 {0,1}。
{n}
n 是一个非负整数。匹配确定的 n 次。例如，’o{2}’ 不能匹配 [...]

By zerged | Posted in linux solaris shell eda 以及工作相关 | Comments (0)