okke The use of moudle worked....but still a curious to know how to transfer data to and from two files in perl via pipes or other mehtod. I am confused on below text book e.g.

use IO::Handle;

pipe(READFROMCHILD.WRITEFROMCHILD);

pipe(READFROMPARENT,WRITETOCHILD);

WRITETOPARENT->autoflush(1);

if ($pid ==fork) {

close(READFROMPARENT);

close(WRITETOPARENT);

print WRITETOCHILD "parent says hi\n";

$data = <READFROMCHILD>;

close READFROMCHILD;

close WRITETOCHILD;

waitpid(-1,0); }