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

##</code><code>##

my $cmdin=gensym;
my $cmdout=gensym;
my $cmderr=gensym;
open3(\*IN, \*OUT, \*ERR, $cmd);