To access a hash key, use curly brackets, not parens. This fixes the errors:

        foreach my $key (keys %data) {
            print "key=$key, value=$data{$key}\n";
            $data{$key} =~ s/(^|$)/"/g if $data{$key} =~ /,/; 
        }
[download]