2014-07-08 44 views
0

這是Perl腳本:匹配區分大小寫的使用Perl

my $keyword = qr/(abc|efg|xyz)/; 

$subject = "ABC"; 
$messageBody = "ZYZ"; 

if (grep{ /${keyword}/i } ($messageBody, $subject)) { 
    print "subject: $subject, messageBody:$messageBody \n"; 
} 

如何匹配是否區分大小寫?它不適用於「ABC」,但適用於「abc」。

請幫忙。提前致謝。

回答

1

只是省略/i正則表達式開關,

if (grep{ /$keyword/ } $messageBody, $subject) { 
+0

非常感謝。它的工作 – user2201935

+0

@ user2201935你可以upvote,如果它適合你。 –

+0

當然。我嘗試過,但它不允許,並且顯示一條消息「您可以在」很多「分鐘內接受答案。 – user2201935

0

添加不區分大小寫的改性劑,

my $keyword = qr/(?i)(abc|efg|xyz)/; 
+0

非常感謝。 – user2201935

相關問題