Re: Writing to a file using Formats

The answer can be found in the manpage to select:

"Second, references to variables related to output will refer to this output channel".

See also the example directly below that sentence.

Since you define the format for STDOUT (before the select() call) no format is defined for FILE. Solution: Move the format definition after the select()

UPDATE: Since no one else seemed willing to risk brain damage to answer your second question I had to do it myself: Setting $- to 0 will force a new page on the next write. This is described in write

Comment on Re: Writing to a file using Formats

Replies are listed 'Best First'.
Re^2: Writing to a file using Formats by biohisham (Priest) on Aug 01, 2009 at 23:29 UTC
Thanks, in situation 2 it worked fine, I could start a new page by setting $- to 0 after a certain run so no overlapping sort of thing is involved. unfortunately for the first case, this doesn't seem to be the answer, I have tried it over and over, it gives me blank command shell when I did move the format definition after the select(), and the file created therefore would still be blank, I seem to not be able to associate to select the filehandle in a proper manner, another error I get is `undefined format "FILE" called at Program.pl ...` [download] when I explicitly associate to write() the filehandle "FILE", there is something else which I am not noticing apparently...so still this situation is open for the experiences of Perl Monks to tackle it. Thanks for everyone in advance. Excellence is an Endeavor of Persistence. Chance Favors a Prepared Mind	[reply] [d/l] [select]
Re^3: Writing to a file using Formats by jethro (Monsignor) on Aug 02, 2009 at 00:22 UTC
Well, I tried it out and it worked, so I'm pretty sure it was the right answer. Note the error message you are getting specifically tells you that the format(!!!) is undefined. You could post your updated code if you don't find the mistake yourself	[reply]