use Win32::TieRegistry (Delimiter => '/');
my $version=2.1;

my $mykey = $Registry->{'HKEY_LOCAL_MACHINE/Software/SPS/$version'};
my $mykeyval = $mykey->{'/AppsDir'};
$mykeyval2="$mykeyval"."\\start.exe";

system("$mykeyval2");