Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!cs.utexas.edu!usc!elroy.jpl.nasa.gov!jpl-devvax!lwall
From: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall)
Newsgroups: comp.lang.perl
Subject: Re: Problems with format...
Message-ID: <7760@jpl-devvax.JPL.NASA.GOV>
Date: 12 Apr 90 22:59:46 GMT
References: <1649@rsiatl.UUCP> <7744@jpl-devvax.JPL.NASA.GOV> <1764@rsiatl.UUCP>
Reply-To: lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall)
Organization: Jet Propulsion Laboratory, Pasadena, CA
Lines: 16

In article <1764@rsiatl.UUCP> pda@rsiatl.UUCP (Paul D. Anderson) writes:
: What appears
: to be happening is that close(OUT) doesn't reset the top of page counter.
: On each subsequent page, more and more lines of the body appear *before*
: the top of page header.  I suspect this is probably actually the case-
: since I close the output stream on each iteration of the loop to force a
: new top-of-page.  

OK, you have to reset that counter yourself--close won't do it.  In fact,
that's how you force a top of form in the middle of a report.  Just say

	$- = 0;

and that sets the number of writable lines left on the current page to 0.

Larry