$string = q(<Command>^C^C(C:BJ_TBLOGOUT);-vbarun BJ__POSFIND GEM_F_FL ALK </Command>);
($wert) = $string =~ />([^<]+)</;
say $wert;

$string = q(<Revision MajorVersion="16" MinorVersion="2" UserVersion="1" />);
($wert) = $string =~ m|<.*MinorVersion="(\d+)"[^>]+>|i;
say $wert;