RE: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
:03 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: Beginner Perl Subject: Re: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF On 1/23/07, Wagner, David --- Senior Programmer Analyst --- WGO <[EMAIL PROTECTED]> wrote: >

RE: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
--- Senior Programmer Analyst --- WGO Cc: Beginner Perl Subject: Re: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF On 1/23/07, Wagner, David --- Senior Programmer Analyst --- WGO <[EMAIL PROTECTED]> wrote: > I am just trying to read t

Re: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Tom Phoenix
On 1/23/07, Wagner, David --- Senior Programmer Analyst --- WGO <[EMAIL PROTECTED]> wrote: I am just trying to read text files which are delimited by a regular end of line. I usually only read one file at a time, but thought it should not be that big a thing to have two file handles open

RE: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Wagner, David --- Senior Programmer Analyst --- WGO
- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Tom Phoenix Sent: Tuesday, January 23, 2007 11:51 To: Wagner, David --- Senior Programmer Analyst --- WGO Cc: Beginner Perl Subject: Re: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF On 1/23

Re: Trying to read two files using a sub to get the data, but 2nd read on the 2nd file goes to EOF

2007-01-23 Thread Tom Phoenix
On 1/23/07, Wagner, David --- Senior Programmer Analyst --- WGO <[EMAIL PROTECTED]> wrote: $MyData =~ s/[[:cntrl:]]/ /g if ( $MyData =~ /[[:cntrl:]]/ ); Why the if clause? I'm not sure I understand your difficulty. But it sounds as if you're not using seek() (or something similar) to get