if ($line =~ /^(\w*)\s*=\s*(\w*)/);