--- Gary Luther <[EMAIL PROTECTED]> wrote:
> I guess what I am asking is how in the Perl do you set the read
> pointer??
Observe perldoc perlfunc.
More specifically:
perldoc -f tell
perldoc -f seek
Just store the address of the pointer after you hit a "node",
then go back to the previous one.
push @node, tell FH; # adds current position to end of @node
seek FH, shift @node; # shift previous position off front of @node
If you do these together, @node will be an array of one element
everywhere but between these statements. =o)
=====
print "Just another Perl Hacker\n"; # edited for readability =o)
=============================================================
Real friends are those whom, when you inconvenience them, are bothered less by it than
you are. -- me. =o)
=============================================================
"There are trivial truths and there are great Truths.
The opposite of a trival truth is obviously false.
The opposite of a great Truth is also true." -- Neils Bohr
__________________________________________________
Do You Yahoo!?
Yahoo! Auctions - buy the things you want at great prices
http://auctions.yahoo.com/
