cwdt.net
当前位置:首页 >> pErl 替换回车换行符 >>

pErl 替换回车换行符

嗯,你说的对,但是你这个会把字符串中间的\r\n都删除,如果只删除尾部的,那么可以这样: s/[\r\n]$//;

$str= " ABC DEFG"; print 1 if $str =~ /C\s+D/m; 或者 print 1 if $str =~ /C[\r\n]+D/m;

perl 的正则语法跟php是兼容的 preg_replace('/\n//','',$var);

因为不知道具体文件格式,换行符有的是\n,有的是\r,有的是\n\r,有的是\r\n,所以我的习惯是这样写: chop($line) while ($line =~ /[\r\n]$/);

\n 是回车换行,就是光标移动到下一行,从下一行开始输入输出。跟换行符效果一样。 \r则只是回车,光标不移动。 正则表达式,又称正规表示法、常规表示法(英语:Regular Expression,在代码中常简写为regex、regexp或RE),计算机科学的一个概...

#!/usr/bin/perl use 5.018; use warnings; chomp(my $text=); say "say is $text"; print "print is $text"; 输出结果: $ perl test.pl fdsfdf\n say is fdsfdf\n print is fdsfdf\n$ say和print一样的。 意思是说chomp怎么没有把我输入的\n给...

一定是 chomp ! chop 是把一个字串最尾的字符去掉, 而 chomp 是只把所有能辨识到的换行符都去掉 $s = "abc\r\n";$ss = $s; chomp $ss ; # $ss = "abc"$ss = $s; chop $ss ; # $ss = "abc\r" 不是你想要的结果!$s = "abc";$ss = $s; chomp $ss; #...

恩 我认为 s/\\s//g 可以消除所有看不见的字符另外 s/\\h//g??s/\\v//g 分别表示 横向和纵向空白 试试就知道了

$file = "指定文件";open F, $file or die "Can't open $file for read";@data = ;close F;my $text = join "", @data;$text =~ s/:/:\n/g;open F, ">$file" or die "Can't open $file for write";print F $text;close F;

$str = 'XXXXX{AAAAA},{BBBBBB},{CCCCCCC}';@data = $str =~ /{([^\{]+)}/g;print "@data"; #AAAAA BBBBBB CCCCCCC 顺便也答一下, 您那 $str =~s/}/}\n/g 不行, 是因为 \n 在这里变成了 escape n ( 即告诉 regex 如果见到 n, 请不当它是特殊字符...

网站首页 | 网站地图
All rights reserved Powered by www.cwdt.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com