Here is an example of the result I was dreaming of (given the example data):

my $registry = loadreg('file.reg');
print $registry->{'SessionServer/NamespaceProviders'}; # would print 3
+2225
print $registry->{'SessionServer/NamespaceProviders'}{'ODBC'}; # would
+ print ssprovider_db
print $registry->{'SessionServer/NamespaceProviders'}{'ODBC'}{'TYPE'};
+ # would print REG_SZ
[download]