Help needed in parsing file!!!!!

Hi,

    I am trying to parse a rule file and make into a table.My input file was like:

          ;RULE NO.  LAYER      TYPE       VALUE
               R1A,      POLY,      WIDTH,      0.6
               R1B,      POLY,      SPACE,      0.75
               R2A,      ACTIVE,    WIDTH,      1.5
               R2B,      ACTIVE,    SPACE,      0.75

 I was sucessful in parsing this and making into table using the following code:

               procedure( parseFile( ipFile )
                    let( ( index Table rulesFile value key line ruleLookup)
                      unless( ruleFile = infile( ipFile)
                      error( "Cannot open file %L for reading" ipFile)
                       ) ; unless
  
  
                Table = makeTable("myTable" nil)
                   rulesFile = infile( ipFile )
                  while( gets( line rulesFile )
                  index = parseString( line ",")
                  when(index
                   value = nil
          ;;Remove Headers of the rules file
                       unless(rexMatchp("RULE NO" car(index))
                        rexCompile("^ *")
                       key = rexReplace(car(index) "" 0)
                        foreach(col cdr(index)
                          col = buildString(parseString(col))
                           value = append1(value col))
                          when(key && value
                           Table[key] = value))
                           )
                          ) ;while file
                         close( rulesFile )
   
                   ;;Return values and arrange table
                  foreach(key sort(Table~>? 'alphalessp)
                      printf("%s:  " key)
                        foreach(col Table[key]
                        printf("%-15s " col))
                       printf("\n")
                         )
                      Table
                      ) ;let
                ) ;procedure

But if i modify my input file as:

             ;RULE NO.     LAYER/LAYERS      PURPOSE  MIN.VALUE    COMMENTS
                 R1A,          POLY,                     WIDTH,          0.5
                 R1B,          POLY/ACTIVE,      SPACING,         0.25        ;spacing btn POLY and ACTIVE
                 R1C,          POLY:PIN,                WIDTH,          0.5         ;                "
                 R2A,          ACTIVE,                    WIDTH,          0.5         ; 
                 R2B,          ACTIVE,                 SPACING,         0.25
                 R3A,          MET1:PIN,                 WIDTH,          0.5
                 R3B,          MET1/POLY,           SPACING,         0.3

 What changes i need to make in my earlier code so that it checks the layers instead of a single layer and parse them and put in list?? ie in the Table the layers section should have both the layers specified in rulefile after parsing them(eg: (POLY ACTIVE) in layer section for R1B...

Also i want to know how to ignore the COMMENTS section present in the input file.If anyone in the forum find solution for it,please help me out....

Thanks,

Messi