Re: a less fragile way to test when we need to read and write to STDOUT?

[Michael G Schwern]

On Fri, Apr 01, 2005 at 03:17:38AM +0000, Mark Stosberg wrote:
> > sub echo {
> >     my($input, $command) = @_;
> >
> >     local(*READ, *WRITE);
> >     open2(*READ, *WRITE, "$DARCS $command";
> >             print WRITE "a\n";
> 
> Thanks for the tip. On this line, did you mean to write
> 
>               print WRITE "$input\n";
> 
> ?
 
Yes.