为什么我的文件内容/用户输入不匹配？（缺少冠军规范）

Question

我正在读取文件/，STDIN并在寻找特定值：use strict;use warnings;my $find = 'def';    while (<DATA>) {    if ($_ eq $find) {        print "Found: $_\n"; # Never reached!    }}__DATA__abcdefxyz为什么条件永远不匹配？