perl配置：：作用域，是否可以打印未定义的值？

我想在perl代码中使用Config:：scoped模块

这是我的配置：

http_db{
          user      = 'xxx';
          pass = 'aaa';
          dbname = 'data';
          host = 'dataserver.company.cz';
}

当我使用：

    my $cs          = Config::Scoped->new( file => $config);
    my $cfg_hash    = $cs->parse;
    .
    .
    .
    print $cfg_hash->{http_db}{user};  # prints xxx;
    if ( defined( $cfg_hash->{http_dp}{user} ) ) {
          print "defined"; # does not print
    else{
          print "undefined"; # prints
    }

---

我希望if条件已满，但事实并非如此。为什么？

如果您的代码与此处包含的代码完全相同，那是因为一个简单的打字错误

print语句正确使用了

http\u db

键，但是

if

语句使用了

http\u dp