in reply to Checking a header is printed already?

If you need to know this, it is time to refactor your program, but you can use tell 
perl -le"print tell(STDOUT) for 1 .. 3"
0
3
6

[download]

Replies are listed 'Best First'.
Re^2: Checking a header is printed already?
by Bloodnok (Vicar) on Oct 06, 2009 at 12:02 UTC
    ...so long as the stream is buffered - from tell: ...on a file handle that has been manipulated by sysread(), syswrite() or sysseek(). Those functions ignore the buffering, while tell() does not.

    A user level that continues to overstate my experience :-))
[reply]

In Section Seekers of Perl Wisdom