> <TRACECSV> while $. <= 4; $. is not well-known to many Perl programmers.
<TRACECSV> for 1 .. 4; >>> thanks. Above solution is simple & effective. I agree that I was >>> gratuitously using $. when your solution is far easier to document and >>> probably safer in my program since I have several filehandles open. __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com
