substr($VALUE, 2, 2) =~ s/0/$signal/g;

##</code><code>##

substr($VALUE, 2, 3) = $signal;