`
darkjune
  • 浏览: 310021 次
  • 性别: Icon_minigender_1
  • 来自: 杭州
社区版块
存档分类
最新评论

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 $line_right=substr($line,$end,$len);

my $newline=$line_left.$exp.$line_right;

}

整个非常简单,line就是原始字符串,exp就是要替换进去的字符串,beg和end是要将原始字符串替换的位置。

分享到:
评论

相关推荐

    perl 函数全集(绝版)

    Perl函数全集中,可能还涵盖了正则表达式相关的函数,如**match** (`m//`),**replace** (`s///`),**split** (`split//`),以及模式匹配的相关辅助函数如**quotemeta**,**length**等。 此外,Perl还有许多高级...

    比较strtr, str_replace和preg_replace三个函数的效率

    str_replace函数是PHP中最基础且常用的字符串替换函数,它支持替换字符串数组中的内容。str_replace会遍历search数组中的每个元素,并在subject字符串中进行查找,将找到的元素替换为相应的replace元素。str_replace...

    Freemaker Replace函数的正则表达式运用

    Freemaker的Replace函数是用于字符串替换的一个强大工具,它支持正则表达式,极大地扩展了其功能。在本文中,我们将深入探讨如何使用Freemaker的Replace函数与正则表达式结合,以及各种模式参数的含义。 首先,让...

    perl中文参考手册

    在函数部分,手册涵盖了Perl内置的大量函数,如字符串操作函数(如`length`、`substr`)、正则表达式函数(如`match`、`replace`)、文件处理函数(如`open`、`close`、`readline`)以及系统调用函数(如`system`)...

    eregi_replace与preg_replace 函数代码的用法比较

    `preg_replace`使用的是Perl兼容的正则表达式,功能更加强大且灵活性更高。对于逆向引用的使用,建议使用`${n}`的形式以避免歧义。理解这些函数的具体用法和原理,有助于开发者更好地利用它们编写出高效、准确的代码...

    PHP5.2下preg_replace函数的问题

    模式应遵循Perl兼容正则表达式语法,而替换值可以是简单的文本字符串或回调函数,用于自定义替换逻辑。如果遇到复杂的替换需求,还可以考虑使用`preg_replace_callback`,它允许在匹配后执行自定义函数来决定如何...

    perl脚本学习范例

    可以使用open()函数打开文件,readline()或操作符读取行,print()写入内容,最后用close()关闭文件。例如: ```perl open(my $fh, ', 'filename.txt') or die "Cannot open file: $!"; while (my $line = <$fh>) { ...

    php中正则替换函数ereg_replace用法实例

    ereg_replace函数在处理字符串替换时非常强大,尤其在需要进行模式匹配并替换的场景中使用广泛。 ereg_replace函数的基本语法是: ```php string ereg_replace ( string $pattern , string $replacement , string $...

    Perl 与 PHP 的比较

    - **Perl函数定义**: - 定义函数:`sub foo { my @args = @_; }` - 使用全局变量:`sub foo { $x = 5; }` - **PHP函数定义**: - 定义函数:`function foo() { $args = func_get_args(); }` - 使用全局变量:`...

    perl 对文本一些常用操作和常用正则表达式

    #### 三、其他实用函数 - **字符串长度获取**:`length` - **字符串替换**:`substr` - **位运算和数据打包/解包**:`pack/unpack` - 示例代码: ```perl $decimal = 17; $newdecimal = unpack("B32", pack("N",...

    perl正则表达式详解

    2. **替换(Replace)**:`s/<regexp>/<substituteText>/`用于查找`<regexp>`并用`<substituteText>`替换。例如,`$scalarName =~ s/a/b/`会将`$scalarName`中所有的'a'替换为'b',并返回替换是否成功。 3. **转换...

    Perl5学习手册HTML版.rar

    3. **字符串操作**:Perl5擅长处理文本,提供了丰富的字符串函数,如 `length`、`substr`、`index` 和 `replace`,以及正则表达式,用于模式匹配和替换。 4. **数组和哈希**:Perl5中的数组是有序元素集合,可以...

    Perl语言入门

    Perl提供了一系列的文件处理函数,如`open`、`close`用于打开和关闭文件,`和`>`分别用于读取和写入,`<>`用于从输入文件句柄读取整行。 八、模块与CPAN Perl拥有丰富的模块库——CPAN(Comprehensive Perl Archive...

    PHP常用函数手册大全

    现代PHP推荐使用`preg_match()`、`preg_replace()`等PCRE(Perl Compatible Regular Expressions)函数,它们更强大且效率更高。 8. `split()` `split()`函数已废弃,它根据指定的分隔符将字符串分解成数组。现在...

    PHP函数参考

    PHP的`preg_match()`、`preg_replace()`和`preg_split()`函数使用Perl兼容正则表达式(PCRE)进行匹配、替换和拆分字符串。 10. **会话管理** `session_start()`开启会话,`$_SESSION`超级全局数组存储会话数据,...

    perl-pocket-ref-5.004.1.pdf

    该文档详细介绍了Perl编程语言的基础语法、变量、运算符、函数等内容,并提供了针对不同应用场景的实用模块介绍。下面将基于文档目录中的各个章节来总结和解释Perl语言的关键知识点。 ### 1. Command Line Options ...

    PHP中基于perl的正则表达式处理函数

    在前面我们也说过,基于perl的正则表达式要快于POXIS正则表达式处理函数,所以我们只介绍以preg开头的基于perl的正则表达式。注意:在能偶使用字符串函数处理的时候,就不要使用正则表达式来处理字符串,因为字符串...

Global site tag (gtag.js) - Google Analytics