More like "doesn't hurt".

++$count{$_} for @list;
[download]

would have to be written

$count{$_} = $count{$_}//0 + 1 for @list;
[download]

if warnings had an effect.