2015-09-10 52 views
0

说我有一个哈希这样的:初始化一个哈希在Perl

$word_count{$file}{$word}++ if blah blah 

我的程序发现用户提供一个字在一个给定的文件中出现的次数。有时用户会提供一个不会出现的单词。如果我尝试打印单词出现的次数+ 1,则会出现错误,说明使用未初始化的值,并在printf中使用未初始化的值。

我怎样才能初始化这个词,因为这个词不会在我的散列?

+1

如果你发现,产生这两个警告代码将是有益的 – ysth

+1

几乎肯定更好的方法做你想要做什么,但没有看到现有的代码,这是不可能提出建议。 –

回答

2
print 1 + ($word_count{$file}{$word} || 0);