Perl redis hset没有返回正确的retcode？

code.pl

print $r->hset('h1', 'apple' => 'orange');

输出：0

它说它无法设置键val，但当我检查redis时，条目就在那里

./redis-cli hgetall h1

输出：
1） 苹果
2） 橙色的

既然它在redis上的设置是正确的，为什么它返回0？
如果键已经存在，但它能够更新值，它是否返回0

需要2个参数。这是怎么回事

./redis-cli hget h1

./redis-cli hget h1