2007-06-11
全文显示

去掉unix中讨厌的^M字符

最近发现好像在dos中打开过的文本文件，拷到unix中会在每行的结尾用vi打开都会出现^M字符，在一些对文本解析要求很高的地方会严重影响解析结果，可以在perl中用正则~s/\r//g 去掉
2007-06-09
全文显示

Perl的replace函数

在使用过程中，遇到一个问题，用Perl的正则表达式无法解决，其正则匹配虽然异常强大，不过好像没有发现满足我需要的replace函数，在实际情况中，我已经把需要替换的15位数据生成好了，只要在特定的文档中的特定的位置，如在需要行中的第15-20的位置把文本替换掉，正则无法做这个，只能手写了一个函数，通过Perl最基本的substr实现此功能： sub replace(){ my ($line,$exp,$beg,$end)=@_; $len=rindex $line."\$", "\$"; #计算Line长度my $line_left=substr($line,0,$beg); my $lin ...
darkjune
搜索本博客
我的相册
45a46d56-bef4-4041-ba1f-3dbf35966fe7-thumb
siebel
共 1 张
最近加入圈子
存档
最新评论