open FOO, ">x";
$foo = <>;