use Win32::TieRegistry(Delimiter=>'/');

my $idval = $Registry->{"HKEY_LOCAL_MACHINE/HARDWARE/DESCRIPTION/System/CentralProcessor/0//Identifier"};