use CGI qw/:standard/;

my @dataWrite;
my @dataRead;
my $x;