主页 / coding / 问题 / 78992211
Accepted
Nash
Asked: 2024-09-17 08:49:25 +0800 CST

如何在 perl 中检查 $j->{component} 是否为空？[重复]

  • 772

这似乎对我不起作用，我不知道如何让它工作。接受我用它创建的 json 的系统不喜欢"components": null,

if ($s->{category} == ""){
    $j->{components} = "Unspecified";
  }
   else
  {
    j->{components} = $s->{category};
  }

谢谢

perl

3 个回答

  1. Best Answer

    分配空字符串仍会分配某些内容。如果您想知道哈希数组是否没有指定的键，可以使用defined()函数。如果您想销毁分配 - 使用undef

    #!/usr/bin/perl
my $j = {};

$j->{var1} = 1;
print $j->{var1}, "\n";

print "has var1\n" if (defined($j->{var1}));
print "does not have var2\n" if (! defined($j->{var2}));

undef $j->{var1};
print "does not have var1\n" if (! defined($j->{var1}));
    • 1

  2. 根据“不存在”的含义，有不同的答案。

    !$s->{category}真实意味着：

    • 密钥category不存在$s，或者
    • 密钥category存在于$s但​$s->{category}undef
    • 键category存在于 中$s，$s->{category}不存在undef但计算结果为假。

    可以通过 检查第一个条件exists。

    • 1
    • exists( $h->{ k } )检查哈希中是否存在。
    • defined( $h->{ k } )检查是否已定义。
    • $h->{ k }检查是否真。
    • ==用于将定义的值作为数字进行比较。
    • eq用于将定义的值作为字符串进行比较。
    • 始终使用use warnings;或等效。
    exists( $h->{ k } ) defined( $h->{ k } ) $h->{ k }
    {} 错误的 错误的 错误的
    {"k":null} 真的 错误的 错误的
    {"k":""}
    {"k":0}
    {"k":"0"}    		 真的 真的 错误的
    {"k":"abc"}
    {"k":"123"}
    {"k":"00"}    		 真的 真的 真的
    • 1

相关问题