open (FOO, "foo");


format FOO=
blah blah

write FOO;