develooper Front page | perl.beginners | Postings from March 2002

parsing a block

From:
al1912
Date:
March 30, 2002 13:02
Subject:
parsing a block
Message ID:
5DF4352C.031795A6.0005C666@netscape.net
Hi,
I've got a file that looks like this:
Data1,Field1,Field2,field3
Data2,F1,F2
Data3,F1,F3
END
Data2,Field3,Field2,field3
Dataw,F1,F3
Datad,F3,F3
END
Data4,Field4,Field4,field3
Data3,F1,F2
Data3,F1,F45
END

I want to be able to split data by using END delimiter but this didn't work! Here what I tried:

# to split lines by END delimiter
while ($line =<INPUT>) {
    @mylineBlock = split/END\n/, $line;
}

@mylines was empty.
then I wanted to split for each lines in an END block by \n

for ( $i  = 0;$i <=$#mylineBlock ; $i++)
   @mysublines = split/\n/, @mylineBlock;
}
then I wanted to access each field in each line in each 'END' block
and I tried
for ( $i  = 0;$i <=$#mysublines ; $i++)
   @myfields = split/\n/, @mysublines;
}

Thanks for any help

AL



__________________________________________________________________
Your favorite stores, helpful shopping tools and great gift ideas. Experience the convenience of buying online with Shop@Netscape! http://shopnow.netscape.com/

Get your own FREE, personal Netscape Mail account today at http://webmail.netscape.com/




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About