为什么我的文件内容/用户输入不匹配？（缺少冠军规范）
我正在读取文件/，STDIN并在寻找特定值：
use strict;
use warnings;
my $find = 'def';
while (<DATA>) {
if ($_ eq $find) {
print "Found: $_\n"; # Never reached!
}
}
__DATA__
abc
def
xyz
为什么条件永远不匹配？
陪伴而非守候浏览 301回答 1
1回答
随时随地看视频慕课网APP
我正在读取文件/，STDIN并在寻找特定值：
use strict;
use warnings;
my $find = 'def';
while (<DATA>) {
if ($_ eq $find) {
print "Found: $_\n"; # Never reached!
}
}
__DATA__
abc
def
xyz
为什么条件永远不匹配？
陪伴而非守候随时随地看视频慕课网APP
源码