use Data::Dumper;
{
   local $Data::Dumper::Useqq = 1;
   print(STDERR Dumper($input));
}