44问答网
所有问题
当前搜索:
perl替换字符串里的字符
如何用
perl
来连接
字符串
答:
a="abc";b="123";c="$a$b"; # $c="abc123";c=$a.$b; # $c="abc123";
perl
匹配之后
字符串
变为数字
答:
=~ 是一个运算符,你要连到一块写,你写= ~这样的话,就是给这个变量赋值了。
perl
相同
的字符串
合并 文件内容 A#xxx A#yyy A#zzz B#hhh B#xxx C#...
答:
while (<DATA>){($k, $c) = /(\w)#(\w+)/;if (! exists($h{$c})){push @k, $c;$h{$c} = [$k];}else{push @{$h{$c}}, $k;}}for (@k){print "$h{$_}[0]#$_\n" if $#{$h{$_}} == 0;print "$h{$_}[0]#$_#$h{$_}[1]\n" if $#{$h{...
perl中
如何将
字符串
转换成二进制码流
答:
请看
perl
文档
里的
pack和unpack,使用H字符模板,可以完成
字符串
和16进制转换。把一个十六进制转为ASCII, 可以这样:hex = "61626364";$str = pack('H*', $hex) ; # 此时str='abcd";把一个字符串转为十六进制格式 str="abcd";$hex = unpack('H*', $str); # 此时$hex="61626364";
perl
同一行中删除匹配
字符串
?
答:
my $str = 'Set {bb/ab/cd ab/dd/ff ab/cd/ml} on';$str =~s/\s{0,}[a-zA-Z\/]{0,}ab\/cd[a-zA-Z\/]{0,}\s{0,}//g;print $str;
perl
如何在指定行插入
字符串
?
答:
做个marker,从文件中每读入一行就让marker加1.当marker跟你的x行相同的时候。插入你需要插入的内容。举个简单的例子:open IN,"f:/a.txt"||die $!; #读入文件 open OUT,">f:/b.txt"||die $!; #输出文件 marker=0;x=5; #要插入的行 while(<IN>){ marker++;if($marker==5)...
字符串的
13、实用程序
答:
一些编程语言设计为编写字符串处理程序更容易编写。这是一些例子:awkIcon
perl
MUMPSsedSNOBOL很多UNIX实用程序进行简单
的字符串
处理,并能用于简单地编写一些强大的字符串处理算法。文件和有限流可以像字符串一样查看。一些新的编程语言,包括
Perl
、Python和Ruby,借助正则表达式来帮助文本处理。
关于
perl
从文件中查找特定
字符串
:
答:
while ($str = <DATA>) {my @p = (0xFFFFFFFF, 0xFFFFFFFF);my $i = 0;while ($str =~ /(\w+)/g) {if ($1 eq 'decision') {$p[0] = $i; if (abs($p[0] - $p[1]) <= 6){print "matched\n"; last;}}elsif ($1 eq 'McMillon') {$p[1] = $i; if...
perl中
范围选择符 $/ 怎么用?请给出一个例子。谢谢!做正则匹配时需要用...
答:
行分割另一方面就是在正则匹配
中的
sm 修饰符了,s是单行模式,即即便
字符串里面
含有\n也只把它当作一个整体来匹配,. 可以匹配 \n。m是多行匹配,把你
的字符
串当作以\n分割的字符多行来匹配,影响^$的意义。不加修饰符是单行而且.无法匹配\n。你可以试下:
perl
-e "print qq{a\n\n} =~...
perl中
每行有多个要匹配
的字符串
怎么取?
答:
while(my $line=~/(\w+)?(\d+)?/gi){ } 其实你的需求写的很不明确。我不知道你是只需要抓取汉字+数字的 这种呢,还是只有汉字/数字的也需要抓取,如果只有汉字/数字 的,又怎么存放在一个哈希里。如果只匹配汉字+数字 就是(\w+)(\d+) 然后 把$1,$2,存到一个哈希里就行 ...
棣栭〉
<涓婁竴椤
6
7
8
9
11
12
13
14
10
15
涓嬩竴椤
灏鹃〉
其他人还搜