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