#! /usr/bin/perl
use warnings;
use strict;
my $test = "/C \"C:\\Program Files (x86)\\Microsoft Office\\OFFICE11\\EXCEL.EXE\" C:\\test.xls";
system ("cmd",$test);
####
my $testfile = "fromdos";
my $test = "/C ${testfile} test.txt";
system ("cmd", $test);
####
#! /usr/bin/perl
use warnings;
use strict;
my $testfile = "resultset.exe";
my $test = "/C ${testfile} localhost root pwd";
system ("cmd", $test);
####
my $test = "${testfile} localhost root pwd";
system ($test);
####
my $test = "/C ${testfile} localhost root pwd";
system ("C:\\WINDOWS\\SysWOW64\\cmd.exe", $test);