$data =~ /tag2=(\d+)/;
$tag2 = $1 if $1;

##</code><code>##

$tag1 = $1 if $data =~ /tag1=(\d+)/;
$tag2 = $1 if $data =~ /tag2=(\d+)/;