$Data::Dumper::Useqq= 1;
print Dumper $mycell_value;