No need to dig through the registry ....

#perl -w
my @cmd = qw{start foo.txt};
system(@cmd);
[download]

if you don't want to return to the perlprogram, use exec instead of system.