The regex is fine.
# 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; }
but on this $line =~ /^The version of (bhs|tt).dll on this machine is (.+)/i
your setting "serverBhsVersion" to "bhs" or "tt" not script version.
(bhs|tt) is $1
need to use $2 or fix the regex.
# 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; }
[Updated on: Fri, 06 July 2012 15:25]
Report message to a moderator