From: Tad McClellan on
James Egan <jegan473(a)comcast.net> wrote:
> On Fri, 13 Nov 2009 20:37:20 -0600, Tad McClellan wrote:
>
>> nobody <nobody(a)nowhere.com> wrote:
>>> I'm trying to process flat files with many thousands of records. In
>>> these files several rows comprise the information for a single
>>> customer. In the example __DATA__ below, I'm trying to fill the
>>> variables with the customer information while the customer number is
>>> 06020004293, then for customer number 07020000279, and finally customer
>>> number 09020000251.
>
>
> I answered my own question.


No you didn't.


> See the block below:
>
> elsif ( $code eq 'B' ) {
> $buffer{Daughter2} = substr $_, 14, 17;
>
> if (!defined $buffer{Daughter}) {
> $buffer{Daughter} = substr $_, 14, 17;
> }


That answers nobody(a)nowhere.com's question.

You are not nobody(a)nowhere.com, you are jegan473(a)comcast.net...


--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"