local* F;
fopen(F, ">tst");
print F "hi";
fclose F;