$Hash{$k} += $v;

##</code><code>##

my ($v, $k) = split /;/;