my $cmdin=gensym;
my $cmdout=gensym;
my $cmderr=gensym;
open3($cmdin, $cmdout, $cmderr, $cmd);