Well yes I believe using (.*) would be better than the alpha-numeric check of (\w*) simply because these values may have non-alpha-numeric characters in them at some time and would fail the pattern match.

Ex: Untested

#!/usr/bin/perl -w

use strict;

while (<DATA>) {
   if (/^(Managed Node)(.*)/) {
      my @value = split(/\=/, $2);
      print de_space($value[0]),"\n";
      print de_space($value[1]),"\n";
   }elsif (/^(.*\=.*)/) {
      my @data = split(/\=/, $1);
      print de_space($data[0])." \= ".de_space($data[1]),"\n";
   }
}

sub de_space {
   my $object = shift;
   $object =~ s/ *$//;
   $object =~ s/^ *//;
   return $object;
}

__DATA__
Managed Node XYZ123 = MN
Type = Combo
Rim = Planner
[download]

Well there is a way to extract and isolate everything you wanted but I do not know how you want to use the info when you have it so I just printed it to STDOUT.