my (@dataWrite, @dataRead, $x);