用perl实现命令行打开执行文件

 #open the progress by the command line
#enter:progress name
#out:  progress path

use strict;
use File::Find;
our $Path="C:/Documents and Settings/All Users/「开始」菜单/程序";
$progress_name=$ARGV[0];
$progress_path=$path."//$progress_name";