Okay, here is what I am trying to do. I need to read in the data beginning after "TTY" and read this in until the next "TTY" or "EOS", my dilemma is how do I do that?
Please oh please wise monks brothers and sisters, help me if you can...
Here is the file that I am trying to read in...
"TTY"
"A1" "" "CBI" "*********************************** APPLICANT-C1 ******
+***********************************
EQUIFAX 5.0 for application 4309
*526 EQUIFAX CREDIT INFORMATION SERVICES
P O BOX 740241 1150 LAKE HEARN DRIVE STE 460 ATLANTA GA 303740241
+ (800) 685-1111
BEACON: 623
00022-ACCOUNT NOT PAID AS AGREED, PUBLIC RECORD, OR COLLECTION AGENC
+Y FILLING
00018-NUMBER OF ACCOUNTS CURRENTLY OR IN THE PAST NOT PAID AS AGREED
00010-RLTNSHP OF BALANCE TO HIGH CREDIT ON BANK/NAT OR OTHER REVOLVI
+NG/OPEN ACCTS
00013-LENGTH OF TIME (OR UNKNOWN TIME) SINCE ACCT PD AS AGREED OR TR
+ADE NARR RPTD
D.A.S. SCORE: (CENTRAL MODEL): 704
08023-NUMBER OF ACCOUNTS SHOWING PAYMENT LATE BY 90 DAYS OR MORE / P
+UBLIC RECORD ITEMS
END OF REPORT EQUIFAX AND AFFILIATES 08/29/01 SAFESCANNED.
*********************************** APPLICANT-, FILE-0 ***************
+********************
END OF REPORT EQUIFAX AND AFFILIATES 08/29/01 SAFESCANNED.
"
"TTY" etc....
I am reading in this file as though it were all on one line, but it is not coming from my project that way. Here is the code that I am using...
elsif (/"TTY"/)
{
$TTY_Ind = 1;
$toggle = 34, next if /^"TTY"\s*$/;
}
last if /"EOS"/;
How can I get this to read the data in and not worry about the data running onto the next line. I want you to know that if I go in the vi editor and delete all the end of line characters (of which I cannot see - they are mysterious), I can get this file read in perfectly. Please help me with this if you have knowledge. I am racking and racking and racking my brain on this one.
PS Don't panic on the information in here it is all false...
peace, LOVE and ((code))
basicdez