this is my code:
my %hash=();
while (<DATA>) {
split /\=|,/;
$hash{$_}++;
}
map{print "$_ == > $hash{$_}\n"} sort keys %hash;
__DATA__
1=2,3,4
a=1,1,5
I don't know why it warn me : Useless use of split in void context at get_path.pl line 11."
and how should I change the code to avoid this warning? thank you~~~~~