;store_data ($customer, $asn_num, $ult_recv, $cont_num, $data);
}
&output_data($imptasn_file);
&show_customers ();
untie %all;
close ASN;
- Original Message -
From: "Greg Wardawy" <[EMAIL PROTECTED]>
To: <
> What am I missing here?
>
> TIA
>
> Greg
>
greg.. i see you already got an answer..
you may want to adopt a different approach than one massive in-line if-else
statement. it's hard to tell what you are doing with the line once you
identify it - but you may want to isolate the line number
Greg Wardawy wrote [in part]:
> this gives me Unrecognized for the lines 6 and 7:
. . . .
> } elsif (/^line4/) {
>
> #code;
>
>if (/^line5/) {
>
> #code;
>
> if (/^line6/) {
>
>#code;
>
> if (/^line7/) {
>
>#code;
Umm, isn't that what it *should* do
Greg,
In your code example:
while () {
if (/^line1/) {
#code
} elsif (/^line2/) {
#code
} elsif (/^line3/) {
#code
} elsif (/^line4/) {
#code;
if (/^line5/) {
#code;
if (/^line6/) {
#code;
if (/^line7/) {
#code;
}
}
}
} elsif (/^lin
Hello all,
For the following structure of the data:
Liine1
Line2
Line3
Line4
Line5a
Line6a
Line7a
Line7b
Line7c
Line6b
Line7d
Line7e
Line7f
Line6c
Line7g
Line7h
Line7i
Line5b
.
.
.
Line8
this gives me Unrecognized for the lines 6 and 7:
#
