[問題] print special characters (\t,\n,...)
我在學習regular expresion時, 寫了以下代碼
@pattern = ("ddd\t rrr", "ddd\tggg");
@match = ("d( |\t)+", "d ");
foreach my $p (@pattern) {
foreach my $m (@match) {
if ($p =~ /$m/) {
print ("p:$p match m:$m \n");
}
}
}
print那一行的結果如下：
p:ddd rrr match m:d( | )+
p:ddd ggg match m:d( | )+
請教板上各位先進
是否有辦法print出raw string如下
p:ddd\t rrr match m:d( |\t)+
p:ddd\tggg match m:d( |\t)+
謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.171.160.10
※ 文章網址: https://www.ptt.cc/bbs/Perl/M.1425297471.A.BB8.html
推
03/05 01:32, , 1F
03/05 01:32, 1F
→
03/05 01:33, , 2F
03/05 01:33, 2F
→
03/05 01:36, , 3F
03/05 01:36, 3F
→
03/05 01:39, , 4F
03/05 01:39, 4F
→
03/05 01:41, , 5F
03/05 01:41, 5F
→
03/05 01:42, , 6F
03/05 01:42, 6F
Perl 近期熱門文章
PTT數位生活區 即時熱門文章
10
18
