Json Perl：不能在new.pl第24行使用未定义的值作为哈希引用

错误：

1. my $source_json = $_;
2. my $data = parse_json_safe($source_json);
3. my %data=%{$data};   #Error . 

这只是代码的一部分。有人请解释为什么它会给出这个警告或错误。我是Perl新手。 问题已经解决了，伙计们，你们能收回你们的反对票吗。我不能再问别的问题了。请伙计们。

parse_json_safe返回undf，您需要hash引用来遵从hash

---

您应该使用which，因为您没有进行任何检查，所以它会引发异常。

请您编写$source_json并使用Data:：Dumper；打印$数据，这样我们可以看一看。写紧急！！！如果你不为别人的工作付钱，你真的一事无成：-@TheGr8Adakron:你的紧急乞讨已经从你之前四个问题中的三个问题中删掉了，现在这一个也删掉了。我们需要做些什么来明确这些短语不属于这里？请注意，如果你获得太多的反对票，你的帐户将自动达到一个问题禁令，因此关注这些反馈是一个好主意。

**Error** : Can't use an undefined value as a HASH reference at new.pl , <FH> line 3.