In that case I can think of two things to do.
1. Use a tied filehandle. The tied object will contain the line
you already read, and the real filehandle. Pass the
tied filehandle to the subroutine. When the subroutine
tries to read the tied filehandle the first time,
give it the line you already read. After that, give it
data out of the real filehandle.
2. Read all the data from standard input and
save it to a temporary file, or several temporary files.
Then use seek on the temporary file.
Solutions 'outside the box' would include (3) redesigning the stupid subroutines
that require a filehandle argument instead of a string argument,
and (4) finding the person responsible for dumping
all the file data insto a single stream in the first place,
and hitting him with an ax.
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.