open($fh, "+<", \$string);