$unInstallExepath= "c:\program files\netbeans 7.0\uninstall.exe";
my $path = dirname($unInstallExepath);     # $path contain  c:\program files\netbeans 7.0
my $exe = basename($unInstallExepath);   # $exe contain  uninstall.exe

chdir ('$path') or print "XXXXXXXXXXXXXXXXXXXXXXXXXXXX   $!";   
System ("start $exe");


##</code><code>##

#$path = quotemeta($path);
  	#$path =~s /\\/\//g;
  	#$path =~s / /\\/g;
  	#$path =~s /(\s\w*)/\~1/;
  	#$path =~s /(\s\d*)/\~1/;