% perl -we'my %hash;$hash{foo} = split /\,/,"1,2,3";print $hash{foo};print "\n@_\n"'
Use of implicit split to @_ is deprecated at -e line 1.
3
1 2 3
% perl -v      

This is perl, v5.8.8 built for x86_64-linux-thread-multi