print "(($string))\n<<$oldstring>>\n";