> To be honest, I don't think I've ever had to pull a
> REG_MULTI_SZ file from
> the registry, but from what I understand the way they are
> stored is as a
> list of strings with a null terminator between them and a
> double-null at the
> end. I'm not sure how you would show that in Perl. I would
> check out the
> docs on Win32::TieRegistry. I think you can pull the value
> as an array.
this is from a script of mine, note the \0\0 (NULL NULL)
use Win32::TieRegistry( Delimiter=>"/");
$entry= $eng1->GetValue("CorporateMetaIntroducer");
if ($entry ne "String_to_Compare\0\0") {
$entry=$eng1->SetValue("CorporateMetaIntroducer", "String_that_is_set\0\0",
"REG_MULTI_SZ");
print LOG "CorporateMetaIntroducer
corrected!\n";
}
Lars
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
