my $command="/usr/local/coms/command >comm.out";
system($command);