$ver = $ver +1;
   |
   |
   V
$ver++;

##</code><code>##

        if ($command =~ /<VER NUMBER> /)
        {
            $command =~ s/<VER NUMBER>/$ver/;
        }

##</code><code>##

        $command =~ s/<VER NUMBER> /$ver /;