:) Well, first you should seperate/strip all the non registry stuff out of the program ...

Second, see http://search.cpan.org/perldoc/Win32::TieRegistry#Adding_keys / Storing_items , Create/SetValue is the laborious way to create a forest of trees -- you have to build each tree yourself