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

##</code><code>##

set VAL=<some path>:%VAL%