[22:38:46] <Blacky>   if ( $line =~ /^The Version of the server is (.+)/ || $line =~ /^The version of (bhs|tt).dll on this machine is (.+)/i )
[22:38:46] <Blacky>    { $brconfig::serverBhsVersion = $1; }
[22:38:51] <Blacky> this is why it not working
[22:38:53] <Blacky> regex wrong
[22:39:10] <Blacky> sversion
[22:39:10] <Blacky> >The version of tt.dll on this machine is 4.000000

		# Record the version of the server
		if ( $line =~ /^The Version of the server is (.+)/ || $line =~ /^The version of (bhs|tt).dll on this machine is (.+)/i )
			{ $brconfig::serverBhsVersion = $1; }

$line =~ /^The version of (bhs|tt).dll on this machine is (.+)/i

		# Record the version of the server
		if ( $line =~ /^The Version of the server is (.+)/ || $line =~ /^The version of bhs.dll|tt.dll on this machine is (.+)/i )
			{ $brconfig::serverBhsVersion = $1; }