Use IO::Pipe