use 5.010;

...

$hash{$key} //= 0;