これに正しく一致する正規表現を教えてください。
特定のテキスト (_array) で終わらない文字列を識別したい。否定先読みを使用しようとしましたが、機能しません。(明らかな答えは逆 (m{_array$}) を実行することですが、それを実行したくない理由があります)。
use strict;
use warnings;
while(<DATA>) {
#
## If the string does not end with '_array' print No, otherwise print Yes
m{(?!_array)$} ? print "No = " : print "Yes = ";
print;
}
__DATA__
chris
hello_world_array
another_example_array
not_this_one
hello_world
私の望む出力は次のとおりです。
No = chris
Yes = hello_world_array
Yes = another_example_array
No = not_this_one
No = hello_world